VBA Do Until Loop

Was ist Do Until Loop in VBA Excel?

In VBA Do Until Loop müssen wir Kriterien nach der till-Anweisung definieren. Dies bedeutet, wann die Schleife gestoppt werden soll und die end-Anweisung die Schleife selbst ist. Wenn die Bedingung also FALSE ist, wird die Anweisung innerhalb der Schleife weiter ausgeführt. Wenn die Bedingung jedoch sofort TRUE ist, wird die Anweisung Do Until beendet.

Da die Wörter selbst besagen, dass Sie eine Aufgabe ausführen müssen, bis ein Kriterium erreicht ist, Do, bis die Schleife in fast allen Programmiersprachen verwendet wird, verwenden wir in VBA auch manchmal Do till loop. Do Until Loop bedeutet, etwas zu tun, bis die Bedingung WAHR wird. Es ist wie eine logische Funktion, die auf TRUE oder FALSE basiert.

Dies ist das Gegenteil von Do While-Schleife, wobei Do while die Schleifen ausführt, solange die Bedingung TRUE ist.

Syntax

Do Until-Schleife hat zwei Arten von Syntax.

Syntax # 1 

 Do Until [Bedingung] [Task ausführen] Schleife 

Syntax # 2

 Führen Sie eine Schleife aus, bis [Bedingung] 

Beide sehen sich sehr ähnlich und es gibt eine einfache Unterscheidung.

In der ersten Syntax überprüft die "Do Until" -Schleife zuerst die Bedingung und erhält das Bedingungsergebnis TRUE oder FALSE. Wenn die Bedingung FALSE ist, wird der Code ausgeführt und eine bestimmte Aufgabe ausgeführt. Wenn die Bedingung TRUE ist, wird die Schleife verlassen.

In der zweiten Syntax "Do" -Schleife wird zuerst die Cod-Task ausgeführt und dann getestet, ob die Bedingung TRUE oder FALSE ist. Wenn die Bedingung FALSE ist, wird sie erneut ausgeführt und dieselbe Aufgabe ausgeführt. Wenn die Bedingung WAHR ist, verlässt sie sofort die Schleife.

Beispiel

Ich weiß, dass es nicht so einfach ist, irgendetwas im theoretischen Teil zu verstehen, aber nichts, worüber man sich Sorgen machen müsste. Wir geben Ihnen einfache Beispiele, um die Schleife zu verstehen. Weiter lesen. Um mit dem Lernen zu beginnen, führen wir die Aufgabe aus, die ersten 10 Seriennummern von Zelle A1 bis A10 einzufügen.

Sie können diese VBA Do Until Excel-Vorlage hier herunterladen - VBA Do Until Excel-Vorlage

Befolgen Sie die folgenden Schritte, um die Schleife "Do Until" anzuwenden.

Schritt 1: Erstellen Sie zuerst einen Makronamen, um die Unterprozedur zu starten.

Code:

 Sub Do_Until_Example1 () End Sub 

Schritt 2: Definieren Sie eine Variable als "Long".  Ich habe "x" als langen Datentyp definiert.

Dim x so lange

Schritt 3: Geben Sie nun das Wort "Do Until" ein.

Machen bis

Schritt 4: Geben Sie nach dem Starten des Schleifennamens die Bedingung als "x = 11" ein.

 Tun bis x = 11

x = 11 ist der logische Test, den wir angewendet haben. Diese Zeile sagt also, dass die Schleife ausgeführt werden soll, bis x gleich 11 ist.

Schritt 5: Wenden Sie die CELLS-Eigenschaft an und fügen Sie Seriennummern von 1 bis 10 ein.

Zellen (x, 1) .Wert = x

Hinweis: Hier haben wir erwähnt, dass „x“ bei 1 beginnt, also ist der x-Wert zunächst gleich 1. Wo immer „x“ ist, ist er gleich 1.

Schritt 6: Schließen Sie nun die Schleife, indem Sie das Wort „LOOP“ eingeben.

 Sub Do_Until_Example1 () Dim x As Long Do Solange x = 11 Zellen (x, 1) .Value = x Loop 

End Sub

Ok, wir sind mit dem Codierungsteil fertig. Jetzt werden wir die Codes Zeile für Zeile testen, um die Schleife besser zu verstehen.

Um den zeilenweisen Code auszuführen, drücken Sie zuerst die Taste F8.

Der Makroname wird zuerst durch gelbe Farbe hervorgehoben.

Wenn Sie die gelbe Linie sehen, heißt es, dass dies nicht ausgeführt wird, wenn Sie die Taste F8 noch einmal drücken.

Drücken Sie nun noch einmal die Taste F8. Die gelbe Linie wechselt zu Do Until Loop.

Um die Schleife zu verstehen, setzen Sie einen Cursor auf die Variable "x" und sehen Sie den Wert der Variablen "x".

Also ist x = 0. Da die hervorgehobene Zeile die erste Zeile in der Schleife ist und der Wert von „x“ Null ist, drücken Sie die Taste F8 erneut und sehen Sie den Wert von „x“. Vor diesem Exit läuft der Code und weist "x" den Wert 1 zu.

Starten Sie nun erneut den Lauf einer Schleife, indem Sie die Taste F8 drücken. Siehe den Wert von "x".

Jetzt wird der Wert von "x" als 1 angezeigt. Um der Variablen "x" einen inkrementellen Wert zu geben, müssen wir den Wert der Variablen "x" innerhalb der Schleife als x = x + 1 neu zuweisen.

Drücken Sie nun noch einmal die Taste F8 und wir sollten den Wert 1 in Zelle A1 erhalten.

Drücken Sie nun erneut die Taste F8 und sehen Sie, was der Wert von „x“ ist.

Der Wert der Variablen "x" ist jetzt 2. Unsere Bedingung besagt also, dass die Schleife ausgeführt werden soll, bis die Bedingung WAHR wird. Unsere Schleife läuft also weiter, bis der Wert von "x" 11 wird.

Drücken Sie noch einmal F8, um zur Loop-Zeile „Do Until“ zurückzukehren.

Drücken Sie die Taste F8 noch zweimal, um den Wert 2 in Zelle A2 zu erhalten.

Drücken Sie die Taste F8 erneut und der Wert von „x“ wird jetzt 3.

Drücken Sie die Taste F8 erneut, um erneut zur Schleife zurückzukehren.

Auf diese Weise führt diese Schleife die Aufgabe erneut aus, bis der Wert von "x" 11 wird. Jetzt habe ich die Schleife ausgeführt, bis der Wert "x" 11 wird.

Wenn ich jetzt F8 drücke, kehrt es immer noch zur Schleife zurück.

Wenn ich jetzt die Taste F8 drücke, wird die Schleife verlassen, da die angewendete Bedingung "TRUE" wird, dh x = 11.

Wir haben jetzt Seriennummern von 1 bis 10 im Excel-Blatt.

Dies ist also die Grundidee der "Do Until" -Schleife. Um Schleifen zu verstehen, müssen Sie den Code zeilenweise ausführen, bis Sie das vollständige Wissen über Schleifen erhalten.