Excel VBA - keluar untuk loop

Saya ingin keluar saya untuk loop ketika dalam kondisi terpenuhi. Bagaimana aku bisa keluar saya untuk loop ketika jika kondisi telah terpenuhi? Saya pikir semacam keluar pada akhir saya jika pernyataan, tapi don't tahu bagaimana itu akan bekerja.

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
Mengomentari pertanyaan (1)
Larutan

Untuk keluar dari lingkaran anda, anda dapat menggunakan Keluar

Jika [kondisi] Maka Keluar Untuk

Komentar (1)

Cara lain untuk keluar Untuk loop awal adalah dengan mengubah loop counter:

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
Komentar (2)