[VBA] stoppen lus vanuit andere procedure

[107mb]

in VBA doorloop ik een lus. Vanuit deze lus wordt een tweede procedure aangeroepen. Hoe kan ik vanuit deze tweede procedure de lus afbreken?

End is geen optie, omdat deze de gehele VBA code afbreekt.

[Lustucru]

Twee mogelijkheden:

Visual Basic:

Sub x()
Do
if func2 then exit do
Loop Until func2
End Sub
Function func2()
func2 = MsgBox("Stoppen?", vbYesNo) = vbYes
End Function

of 4 mogelijkheden, als je het zetten van een variabele op moduleniveau meerekent.

[107mb]

het zetten van een variabele is de beste optie in mijn situatie.

thanks

[ Voor 38% gewijzigd door 107mb op 01-04-2011 13:22 ]