VBA Excel: Beispielschleifen, um die Arbeit zu erleichtern

Microsoft Excel ist eine der beliebtesten Anwendungen für die Arbeit mit Tabellendaten. Einer seiner Hauptvorteile ist die Möglichkeit, Routineaufgaben mithilfe von VBA-Makros (Visual Basic for Applications) zu automatisieren. Besonders nützlich sind dabei Schleifen, die es ermöglichen, wiederholte Vorgänge auf einem bestimmten Dataset auszuführen. In diesem Artikel werden wir uns einige Beispielzyklen ansehen, die Ihnen helfen, die Arbeit mit Excel zu erleichtern.

Eine der einfachsten und gebräuchlichsten Arten von Schleifen in Excel VBA ist eine "for" —Schleife. Es ermöglicht Ihnen, den angegebenen Codeblock eine bestimmte Anzahl von Malen auszuführen. Sie können beispielsweise eine for-Schleife verwenden, um eine Multiplikationstabelle für eine Zahl mit einem bestimmten Bereich von Zahlen zu erstellen. Eine solche Schleife kann wie folgt geschrieben werden:

Sub multiplicationTable()

Dim i As Integer

Dim number As Integer

number = 5

For i = 1 To 10

Mit den obigen Schleifen können Sie die Menge an Code erheblich reduzieren und die Verarbeitung von Daten in Excel automatisieren. Weitere Informationen zu Schleifen und deren Funktionen finden Sie in der VBA-Dokumentation.

Beispiele für die Verwendung von Schleifen in Excel VBA

Schleifen sind ein leistungsfähiges Werkzeug, mit dem Sie bestimmte Vorgänge im Code wiederholen können. Es gibt verschiedene Arten von Schleifen in VBA Excel, die verwendet werden können, um die Arbeit mit Daten zu erleichtern.

Im Folgenden sind einige Beispiele für die Verwendung von Schleifen in VBA Excel aufgeführt:

For i = 1 To 10' Код, который нужно выполнитьNext i

Do While i < 5' Код, который нужно выполнитьi = i + 1Loop

Do Until i = 5' Код, который нужно выполнитьi = i + 1Loop

For Each cell In Range("A1:A10")' Код, который нужно выполнитьNext cell

Dies ist nur ein kleiner Satz von Beispielen, und es gibt andere Schleifen in VBA Excel, die in verschiedenen Situationen nützlich sein können. Mit Schleifen können Sie Aufgaben automatisieren und Vorgänge wiederholen, was die Arbeit mit Daten in VBA Excel erheblich vereinfacht.

For-Schleife in Excel VBA

Loop-Syntax For sieht wie folgt aus:

For переменная = начальное_значение To конечное_значение [Step шаг]' код, выполняемый внутри циклаNext [переменная]

• Variable - variable, die in einer Schleife verwendet werden soll;
• Anfangswert - der Wert, mit dem der Zyklus beginnt;
• Endwert - der Endwert, bis zu dem die Schleife fortgesetzt wird;
• [Schritt Schritt] (optionales Argument) - der Schritt, mit dem die Variable bei jeder Iteration der Schleife erhöht oder verringert wird.

Beispiel für die Verwendung einer Schleife For:

Sub ПримерЦиклаФор()Dim i As IntegerFor i = 1 To 5Debug.Print iNext iEnd Sub

In diesem Beispiel wird die Schleife For wird 5 Mal ausgeführt, indem Werte zwischen 1 und 5 im Fenster "Immediate" im Entwicklermodus angezeigt werden.

Zyklus For sie können auch Elemente in Sammlungen oder Arrays verarbeiten, indem Sie einen Wertebereich mit den Funktionen LBound() und UBound() angeben.

Sub ПримерЦиклаФорДляМассива()Dim i As IntegerDim arr(3) As Stringarr(0) = "apple"arr(1) = "banana"arr(2) = "cherry"For i = LBound(arr) To UBound(arr)Debug.Print arr(i)Next iEnd Sub

In diesem Beispiel wird die Schleife For wird verwendet, um alle Elemente des Arrays auszugeben arr.

Zyklus For kann auch verwendet werden, um mit Arbeitsblättern, Zellen und anderen Excel-Objekten zu arbeiten.

Do-While-Schleife in VBA Excel

Die Do While-Schleife in Excel VBA wird verwendet, um einen Codeblock zu wiederholen, bis eine bestimmte Bedingung wahr ist. Es führt einen Codeblock aus, solange die zu überprüfende Bedingung True ist.

Die Syntax der Do-While-Schleife lautet wie folgt:

Do While Bedingung 'Loop-Codeblock

Eine Bedingung ist ein Ausdruck, der True oder False zurückgibt. Wenn die Bedingung True zurückgibt, wird der Codeblock ausgeführt. Wenn die Bedingung False zurückgibt, springt die Codeausführung nach der Schleife zur nächsten Zeile. Die Bedingung wird vor jeder Iteration der Schleife überprüft.

Beispiel für die Verwendung einer Do-While-Schleife:

Sub DoWhileExample() Dim i As Integer i = 1 Do While i < 5 Debug.Print i i = i + 1 Loop End Sub

In diesem Beispiel wird die Variable i mit dem Wert 1 initialisiert. Dann wird die Do-While-Schleife wiederholt, bis der Wert von i kleiner als 5 ist. Bei jeder Iteration wird der Wert von i um 1 erhöht und gedruckt.

Ergebnis der Codeausführung:

Mit einer Do-While-Schleife können Sie je nach Bedingung einen Codeblock so oft ausführen, wie er benötigt wird. Es ist ein leistungsfähiges Werkzeug, um Aufgaben in VBA Excel zu automatisieren.

Eine Do-Until-Schleife in VBA Excel

Die Do Until-Schleife in Excel VBA ermöglicht es Ihnen, einen bestimmten Codeblock auszuführen, bis die angegebene Bedingung wahr ist. Daher wird die Schleife ausgeführt, bis die nach dem Schlüsselwort Until angegebene Bedingung wahr ist.

Die Syntax der Do-Until-Schleife lautet wie folgt:

• führt Code aus;
• überprüft die Bedingung;
• wiederholt die Schritte, bis die Bedingung wahr ist.

Hier ist ein Beispiel für eine Do-Until-Schleife, die Zahlen zwischen 1 und 10 druckt:

Dim i As Integer

In diesem Beispiel wird die Variable i mit dem Wert 1 initialisiert. Die Schleife überprüft dann die Bedingung i > 10 und führt den Code innerhalb der Schleife aus, der den Wert der Variablen i druckt und um 1 inkrementiert. Nach jeder Iteration der Schleife wird der Wert der Variablen i erhöht, und die Schleife wird wiederholt, bis i größer als 10 ist.

Eine Do-Until-Schleife in Excel-VBA kann für die Verarbeitung von Daten, das Filtern von Listen, das Suchen von Werten und andere Aufgaben nützlich sein, bei denen Code ausgeführt werden muss, bevor eine bestimmte Bedingung erreicht wird.