excel vba exit for next loop
'In VBA how to exit a For Next loop when a condition
'is met: use Exit For.
For i = 1 To 1000
c = c + 1
If c = 750 Then Exit For
Next
'Exit For can also be used inside a For Each loop:
For Each r In [A1:A10]
c = c + c
If r.Value = "Hi" Then Exit For
Next
'-------------------------------------------------------------------
'Note: If multiple For Loops are nested, Exit For transfers
' control to the next higher level of nesting.
'-------------------------------------------------------------------
'VBA also has the Exit Do statement for Do Loops:
Do
c = c + 1
If c = 750 Then Exit Do
Loop While i < 1000
'VBA does NOT have an Exit statement for While Wend loops. While Wend
'loops must run through completion, or be interrupted
'by a GoTo statement:
While i < 1000
c = c + 1
Wend