it-swarm.com.de

Excel VBA - Exit für Schleife

Ich möchte meine for -Schleife verlassen, wenn eine Bedingung im Inneren erfüllt ist. Wie kann ich meine for Schleife verlassen, wenn die if Bedingung erfüllt ist? Ich denke eine Art Exit am Ende meiner if -Anweisung, aber ich weiß nicht, wie das funktionieren würde.

Dim i As Long
For i = 1 To 50
    Range("B" & i).Select
    If Range("B" & i).Value = "Artikel" Then
        Dim temp As Long
        temp = i
    End If
Next i
Range("A1:Z" & temp - 1).EntireRow.Delete Shift:=xlToLeft
164
CustomX

Um die Schleife vorzeitig zu beenden, können Sie Exit For verwenden.

If [condition] Then Exit For

311
Dan

Eine andere Möglichkeit, eine For-Schleife vorzeitig zu beenden, besteht darin, den Schleifenzähler zu ändern:

For i = 1 To 10
    If i = 5 Then i = 10
Next i

Debug.Print i   '11

For i = 1 To 10
    If i = 5 Then Exit For
Next i

Debug.Print i   '5
23
paul bica