VBA-Beispiele - Top 4 VBA Macro Excel Beispiele für Anfänger

• Excel VBA-Beispiele

Excel VBA-Beispiele

Als ich anfing, VBA-Makros zu arbeiten und zu lernen, war ich verwirrt, wo ich anfangen sollte. Wir haben bereits den VBA-Editor gesehen, der alle Definitionen der Optionen und Registerkarten des VBA-Editor-Fensters enthält. Als Anfänger wissen wir immer nicht, wie wir anfangen sollen, bis wir einen gefunden haben. Dieser Artikel ist die Lösung für Benutzer, die Schwierigkeiten haben, VBA-Beispiele zu verwenden und zu erlernen und Makros zu erstellen. Wir alle hatten es mit der Zeit zu tun, als bestimmte Dinge in Excel mithilfe von Macro automatisiert werden konnten. Jemand, der nicht weiß, wie man VBA verwendet, kann jedoch keinen erstellen. Dies ist eine nützliche Anleitung für diejenigen, die mit der VBA-Makrokodierung noch nicht vertraut sind.

Beispiele für VBA in Excel für Anfänger

Unten sehen Sie die Beispiele für VBA in Excel:

Sie können diese Excel-Vorlage für VBA-Beispiele hier herunterladen - Excel-Vorlage für VBA-Beispiele

VBA-Beispiel # 1

Sehen wir uns ein einfaches Beispiel für die Verwendung der VBA-Codierung an. Führen Sie dazu die folgenden Schritte aus:

Schritt 1: Öffnen Sie ein VBA-Modul, in das wir unseren Code über die Menüregisterkarte Einfügen schreiben, wie unten gezeigt.

Schritt 2: Schreiben Sie nun die Unterprozedur des VBA-Makros in einen beliebigen Namen.

Code:

 Sub VBA_Examples1 () End Sub 

Schritt 3: Definieren Sie eine Variable mit DIM, in der Zahlen als Ganzzahlen gespeichert werden.

Code:

 Sub VBA_Examples1 () Dim A As Integer End Sub 

Schritt 4: Geben Sie der oben definierten Variablen eine beliebige Nummer, wie unten gezeigt.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 End Sub 

Schritt 5: Jetzt verwenden wir das Meldungsfeld, um den in Variable A gespeicherten Wert auszudrucken.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 MsgBox A End Sub 

Schritt 6: Führen Sie den Code aus, indem Sie die Taste F8 drücken oder auf die Wiedergabetaste unterhalb der Menüleiste klicken. Wir werden das Meldungsfeld mit dem Wert 100 sehen.

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 MsgBox A End Sub 

Schritt 7: Dies könnte auch mit der Debug-Druckfunktion geschehen sein, deren Werte im Direktfenster angezeigt werden. ( Hinweis: Drücken Sie Strg + G, um das Sofortfenster zu öffnen.)

Code:

 Sub VBA_Examples1 () Dim A As Integer A = 100 Debug.Print A End Sub 

VBA-Beispiel Nr. 2

In diesem Beispiel sehen wir ein weiteres Beispiel, in dem wir die For-Next-Schleife verwenden, um die Blattnamen zu drucken. Führen Sie dazu die folgenden Schritte aus:

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die Unterprozedur wie unten gezeigt. Wir können jeden Namen verwenden, um dies zu definieren.

Code:

 Sub VBA_Examples2 () End Sub 

Schritt 2: Wählen Sie eine Variable als Ganzzahl. Wir können die Namensvariable wie in Beispiel 1 auswählen.

Code:

 Sub VBA_Examples2 () Dim A As Integer End Sub 

Schritt 3: Öffnen Sie eine For-Next-Schleife wie unten gezeigt.

Code:

 Sub VBA_Examples2 () Dim A As Integer für Next A End Sub 

Schritt 4: Wählen Sie die Position der Zelle aus, an der die Blattnamen angezeigt werden sollen. Da wir hier keine Header-Referenz haben, können wir ab Zelle 1 beginnen.

Code:

 Sub VBA_Examples2 () Dim A As Integer For A = 1 To Sheets.Count Next A End Sub 

Schritt 5: Nun weisen wir die Variable A mit dem Zellenwert zu, um den Blattnamen wie unten gezeigt zu sehen.

Code:

 Sub VBA_Examples2 () Dim A As Integer For A = 1 To Sheets.Count Cells (A, 1) .Value = Sheets (A) .Name Next A End Sub 

Schritt 6: Führen Sie nun den Code durch Drücken der Taste F8 oder durch Klicken auf die Schaltfläche Abspielen aus.

Wir werden sehen, da wir 3 Blätter hatten, alle standardmäßig benannt, so dass ihr Name von Zelle A1 nach unten gedruckt wurde, bis die Anzahl der Blätter erreicht ist, die wir haben.

VBA-Beispiel # 3

In diesem Beispiel lernen wir, wie man die Zahlen druckt. Dieser Prozess ist der gleiche wie in Beispiel 2. Führen Sie dazu die folgenden Schritte aus:

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die Unterprozedur.

Code:

 Sub VBA_Examples3 () End Sub 

Schritt 2: Betrachten Sie eine Variable mit DIM als Ganzzahl. Da wir die Zahlen als Ganzzahl verwenden, sollte der Datentyp verwendet werden.

Code:

 Sub VBA_Examples3 () Dim A As Integer End Sub 

Schritt 3: Öffnen Sie erneut eine For-Next-Schleife (siehe unten).

Code:

 Sub VBA_Examples3 () Dim A As Integer für Next A End Sub 

Schritt 4: Wählen Sie nun den Zellbereich aus, in dem die Nummer bis zum letzten in der For-Syntax angezeigt werden soll.

Code:

 Sub VBA_Examples3 () Dim A As Integer For A = 1 To 10 Next A End Sub 

Schritt 5: Fixieren Sie nun die Zellenposition mit der Variablen A. Hier zeigt der Scheitelpunkt der zweiten Position in der Zelle die Spaltennummer. Da wir 1 gewählt haben, erwarten wir, dass die Zahlen ab Zelle A1 angezeigt werden.

Code:

 Sub VBA_Examples3 () Dim A As Integer für A = 1 bis 10 Zellen (A, 1) .Value = A Next A End Sub 

Schritt 6: Führen Sie nun den Code durch Drücken der Taste F8 oder durch Klicken auf die Schaltfläche Abspielen aus. Wir werden sehen, dass die Zahlen von Zelle A1 bis A10 von 1 bis 10 generiert werden.

Schritt 7: Was ist, wenn wir versuchen, diese Zahlen in die zweite Spalte aufzunehmen? Ändern Sie den Spaltenscheitelpunkt von 1 in 2. Oder fügen Sie eine weitere Codezeile hinzu, wie unten gezeigt.

Code:

 Sub VBA_Examples3 () Dim A As Integer For A = 1 bis 10 Zellen (A, 1) .Value = A Zellen (A, 2) .Value = A Next A End Sub 

Schritt 8: Führen Sie den vollständigen Code erneut aus, indem Sie die Taste F8 drücken oder auf die Schaltfläche Wiedergabe klicken. Wir werden sehen, dass die gleiche Zahl von 1 bis 10 auch in Spalte B von Zelle B1 bis B10 gedruckt wird.

VBA-Beispiel Nr. 4

In diesem Beispiel wird gezeigt, wie die Farbe von leeren Zellen aus den ausgewählten Bereichen geändert wird. Dafür haben wir die gleiche Nummer wie im obigen Beispiel verwendet, aber wir haben einige der Zellen gelöscht, um die Ausgabe zu erhalten.

Schritt 1: Öffnen Sie ein Modul und schreiben Sie die Unterprozedur wie unten gezeigt.

Code:

 Sub VBA_Example4 () End Sub 

Schritt 2: Definieren Sie eine Variable mit DIM als Bereich, während Sie den vorhandenen Nummernbereich auswählen.

Code:

 Sub VBA_Example4 () Dim A As Range End Sub 

Schritt 3: Stellen Sie nun diese Variable als Auswahl ein

Code:

 Sub VBA_Example4 () Dim A As Range Set A = Auswahlende Sub 

Schritt 4: Wählen Sie nun den Zahlenbereich mit der definierten Variablen A aus und wählen Sie xlCellTypeBlanks, um nur die leeren Zellen auszuwählen.

Code:

 Sub VBA_Example4 () Dim A As Range Set A = Auswahl A.Cells.SpecialCells (xlCellTypeBlanks). End Sub 

Schritt 5: Um nun die Innenfarbe von leeren Zellen zu ändern, verwenden Sie Interior.Color und wählen Sie die Farbe aus, mit der die leeren Zellen hervorgehoben werden sollen. Verwenden Sie den Typ vbBlue oder vbGreen, um die Farbe zu definieren. Die Verwendung von vb ist ein Muss.

Code:

 Sub VBA_Example4 () Dim A As Range Set A = Auswahl A.Cells.SpecialCells (xlCellTypeBlanks) .Interior.Color = vbBlue End Sub 

Schritt 6: Wählen Sie nun den Zellenbereich aus und führen Sie den Code durch Drücken der Taste F8 oder durch Klicken auf die Schaltfläche Abspielen aus. Wir werden sehen, dass die Zellen A4 und A7, die leer waren, jetzt blau hervorgehoben sind, wie unten gezeigt.

Vor- und Nachteile von Excel VBA-Beispielen

• VBA erhöht die Effizienz der Arbeit.
• Auf diese Weise möchten wir die sich wiederholenden Aufgaben auf einmal reduzieren.
• Wir können jede Art von Makro erstellen, die wir wollen.
• Wir können auch ein Makro aufnehmen, wenn das Codieren nicht einfach ist.
• Personen ohne Programmierkenntnisse oder -kenntnisse haben möglicherweise Probleme mit der Verwendung des VBA-Makros.

Dinge, an die man sich erinnern sollte

• Anfänger in VBA sollten bedenken, den Code im Macro-fähigen Excel-Format zu speichern. Auf diese Weise können wir den Code in derselben Datei beibehalten.
• Kompilieren Sie immer den vollständigen Code, auch wenn der Code aus einer Zeile besteht. Dies reduziert die Zeit für das Debuggen, wenn Sie nach der Ausführung des Codes auf einen Fehler stoßen.
• Beginnen Sie den Lernprozess von VBA oder einer anderen Programmiersprache immer mit kleinem und einfachem Code. Dies gibt ein besseres Verständnis und Vertrauen.

Empfohlene Artikel

Dies ist eine Anleitung zu VBA-Beispielen in Excel. Hier werden einige nützliche Beispiele für VBA-Makrocode in Excel sowie eine herunterladbare Excel-Vorlage erläutert. Sie können auch unsere anderen Artikelvorschläge durchgehen -

1. VBA Collection (Beispiele)
2. VBA-IF-Anweisungen | Excel-Vorlagen
3. Wie verwende ich die Excel VBA-Sortierfunktion?
4. VBA While-Schleife (Beispiele mit Excel-Vorlage)
5. VBA Environ