/ / Excel VBA Do Until-Schleife

Excel VBA Do Until-Schleife

Obwohl Sie auf dieser Website nicht häufig verwendet werden, befinden Sie sich möglicherweise in einer Situation, in der Sie die Anwendung verwenden möchten Do Until-Schleife im Excel VBA. Code, der zwischen "Do Until" und "Loop" eingefügt wurde, wird wiederholt, bis der Teil nach "Do Until" den Wert "Do Until" hat.

Fügen Sie eine Befehlsschaltfläche in Ihrem Arbeitsblatt ein, und fügen Sie die folgenden Codezeilen hinzu:

Dim i As Integer
i = 1

Do Until i > 6
    Cells(i, 1).Value = 20
    i = i + 1
Loop

Ergebnis, wenn Sie auf die Befehlsschaltfläche auf dem Blatt klicken:

Excel VBA Do Until-Schleife

Erläuterung: bis i höher als 6 ist, platziert Excel VBA den Wert 20 in die Zelle am Schnittpunkt von Zeile i und Spalte 1 und erhöht i um 1. Als Ergebnis wird der Wert 20 sechsmal in Spalte A platziert (nicht sieben, weil Excel VBA stoppt, wenn i gleich 7 ist).

Lesen Sie auch: