Excel VBA
Excel VBA: For Next Schleifen Teil 3 Exit for
Excel VBA
Excel VBA: For Next Schleifen Teil 3 Exit for
Sub Schleifen_For_Next()
For i = 1 To 100
k = k + 1
If k = 50 Then Exit For
Next i
MsgBox k
MsgBox i
End Sub
Excel VBA: For Next Schleifen Teil 3 Exit for
Computer,Office,Excel,VBA,Makro
Excel,VBA,Schleife,For,Next,Exit
Im ersten Teil haben Sie erfahren, wie Sie eine einfache Schleife in Excel VBA aufbauen können. Im zweiten Teil
wurde Ihnen gezeigt, wie Sie die Schrittweite verändern können. Im dritten Teil möchte ich Ihnen zeigen, wie Sie eine
Schleife vorzeitig verlassen können. Dies ist z.B. der Fall, wenn eine andere Bedingung erfüllt ist oder um zu
verhindern, dass die Schleife endlos durchlaufen wird.
Der Befehl dazu lautet Exit for.
Hier ein Beispiel, wo ein solcher Befehl zur Anwendung kommt.
Sub Schleifen_For_Next()
For i = 1 To 100
k = k + 1
If k = 50 Then Exit For
Next i
MsgBox k
MsgBox i
End Sub
In diesem Beispiel wird bereits nach 50 Durchläufen die Schleife verlassen, weil dann die If Then Anweisung bereits
erfüllt ist. Beide Werte k und i haben jetzt en Wert 50.
Im vierten Teil geht es weiter mit der Verschachtelung von Schleifen.