End Double Sub

[Zurn]

Yes I know, but do you have a sollution for my problem? With the *En
Sub*, I end the sub I'm working with, *not the Sub that is referring t
this sub*. (see code a few messages above)

Zur

 

[Rob van Gelder]

Turn the sub into a function and return a boolean (true or false).

The calling procedure exits depending on the value of the returned value.

eg.

Sub Proc()
If Func() = False Then
MsgBox "Arrgh"
Exit Sub
End If

MsgBox "Made it!"
End Sub

Function Func() As Boolean
If MsgBox("Click Me", vbOKCancel) = vbOK Then
Func = True
Else
Func = False
End If
End Function