Schleifen sind eines der wichtigsten Programmierkonstrukte, mit denen ein bestimmter Codeblock wiederholt ausgeführt werden kann. Eine solche Schleife in Excel VBA ist eine Do-Until-Schleife. Diese Schleife ermöglicht die Ausführung von Code, bis die angegebene Bedingung wahr ist. In diesem Artikel betrachten wir einige Beispiele für die Verwendung der Do-Until-Schleife in Excel VBA.
Das erste Beispiel ist die Verwendung einer Do-Until-Schleife, um Zahlen zwischen 1 und 10 auszugeben. Dazu setzen wir die Variable i, die mit jeder Iteration inkrementiert wird. Zuerst setzen wir den Wert von i auf 1. Dann beginnen wir eine Do-Until-Schleife, in der wir den Wert von i ausgeben und ihn um 1 erhöhen. Die Schleife wird ausgeführt, bis i gleich 11 ist.
Das zweite Beispiel ist die Verwendung einer Do-Until-Schleife, um nach einem bestimmten Wert in einem Array zu suchen. Angenommen, wir haben ein Array von arr, das aus 10 Elementen besteht. Wir müssen den Index eines Elements mit einem bestimmten Wert finden. Wir setzen die Variable i auf 0 und beginnen mit einer Do-Until-Schleife. Prüfen Sie innerhalb der Schleife, ob der aktuelle Wert des arr(i) -Arrays dem gewünschten Wert entspricht. Wenn ja, geben wir den Index i aus und verlassen die Schleife. Wenn nicht, erhöhen wir i um 1 und fahren mit der Ausführung der Schleife fort.
Eine Do-Until-Schleife in Excel-VBA ist ein praktisches Werkzeug, um einen bestimmten Codeblock zu wiederholen, bis eine bestimmte Bedingung erfüllt ist. Die obigen Beispiele zeigen nur einige der Möglichkeiten, diese Schleife zu verwenden. Je nach Aufgabe und Anforderung können Sie komplexere Zyklen erstellen, sie ineinander feuchten und unterschiedliche Bedingungen für den Ausstieg aus dem Zyklus verwenden.
Funktionsprinzip des Do-Until-Zyklus
Zyklus Do Until stellt eine der Möglichkeiten für Schleifen in der Excel-Programmiersprache VBA dar. Diese Schleife führt einen Codeblock aus, bis die angegebene Bedingung wahr ist.
Syntax der Do-Until-Schleife sieht wie folgt aus:
Do Until Bedingung
codeblock
Stichwort Do Until gibt den Beginn der Schleife an. Dann folgt eine Bedingung, die vor jeder Ausführung des Codes innerhalb der Schleife überprüft werden muss. Wenn die Bedingung wahr ist, wird die Ausführung der Schleife beendet und nach dem Schlüsselwort zur nächsten Anweisung weitergeleitet Loop.
Innerhalb eines Codeblocks können Sie beliebige Aktionen ausführen, einschließlich Variablenoperationen, Dateneingabe und -ausgabe und vieles mehr.
Beispiel für die Verwendung einer Do-Until-Schleife:
Sub DoUntilExample()Dim i As Integeri = 1Do Until i > 5MsgBox ii = i + 1LoopEnd SubIn diesem Beispiel deklarieren wir eine Variable i und wir weisen ihr den Wert 1 zu. Dann treten wir in eine Schleife ein Do Until wo der Codeblock den Wert einer Variablen ausgibt i in einer Nachricht. Dann der Wert der Variablen i erhöht sich um 1. Die Schleife wird fortgesetzt, bis der Wert der Variablen festgelegt ist i es wird nicht mehr als fünf sein.
Durch die Ausführung dieses Codes werden die Werte 1, 2, 3, 4 und 5 ausgegeben.
Beispiel 1: Verwenden der Do-Until-Schleife, um nach einem bestimmten Wert in einem Bereich zu suchen
Die Do Until-Schleife in Excel VBA ermöglicht es Ihnen, einen bestimmten Codeblock auszuführen, bis die angegebene Bedingung wahr ist. Diese Schleife wird häufig verwendet, um nach einem bestimmten Wert in einem Bereich zu suchen.
Angenommen, wir haben einen Bereich von A1:A10, in dem die Zahlen gespeichert sind. Wir wollen das erste Vorkommen der Zahl 5 in diesem Bereich finden. Wir können eine Do-Until-Schleife zusammen mit einer Bedingung verwenden, die prüft, ob der aktuelle Zellenwert der gewünschten Zahl entspricht.
Dim rng As RangeDim cell As RangeDim searchValue As IntegersearchValue = 5Set rng = Range("A1:A10")Set cell = rng(1)Do Until cell.Value = searchValueSet cell = cell.Offset(1)LoopMsgBox "Число " & searchValue & " найдено в ячейке " & cell.AddressIn diesem Beispiel deklarieren wir die Variablen rng (Bereich), cell (Zelle) und searchValue (Suchwert). Dann weisen wir der Variablen rng den Bereich A1:A10 zu. Dann setzen wir die Variable cell auf die erste Zelle des Bereichs.
Die Do-Until-Schleife führt einen Codeblock aus, bis der aktuelle Zellenwert dem gewünschten Wert entspricht. Innerhalb der Schleife verschieben wir die Zelle mit der Offset-Methode nach unten. Dies ermöglicht es uns, die nächste Zelle im Bereich auf Übereinstimmung mit dem gewünschten Wert zu überprüfen.
Wenn ein Wert in einer Zelle dem gewünschten Wert entspricht, wird die Do-Until-Schleife beendet und wir zeigen eine Meldung mit Informationen über die gefundene Zahl und ihre Adresse in der Zelle an.
Als Ergebnis dieses Codes erhalten wir die Meldung "Die Zahl 5 wurde in Zelle $A$3 gefunden".
Die Verwendung einer Do-Until-Schleife ermöglicht es uns daher, effektiv nach einem bestimmten Wert in einem Bereich zu suchen und die gewünschten Aktionen auszuführen, wenn er gefunden wird.
