Excel VBA - izejiet no cilpas

Es vēlos iziet no savas for cilpas, kad ir izpildīts kāds no tajā esošajiem nosacījumiem. Kā es varētu iziet no savas for cilpas, kad ir izpildīts if nosacījums? Es domāju, ka varētu izmantot kādu izeju if izteikuma beigās, bet nezinu, kā tas varētu darboties.

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
Dragonthoughts
Rediģēts jautājums 19priekšpusdienari2t jūnijā 2019 в 5:10
Programmēšana
vba excel for-loop
23pēcpusdienari3t februārī 2012 в 2:29
5 skati
Risinājums

Lai priekšlaicīgi izietu no cilpas, varat izmantot Exit For.

If [nosacījums] Tad Exit For

Komentāri (1)

Vēl viens veids, kā priekšlaicīgi iziet no For cikla, ir mainīt cikla skaitītāju:

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
Komentāri (2)