how to stop running a macro when a userform is closed

kiwidancer · September 28th, 2009, 05:39 PM

Hello,
I have a macro that begins by using userforms to get data from the user.
I want to make it so that the whole macro stops running (similar to using the pause/break button on the keyboard but without errors) if one of the userforms is closed (using the red x), but i can only seem to get it to stop the specific function it's in.....

Shasur · September 28th, 2009, 09:15 PM

Hi

Can you try the following:

Code:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    End
End Sub

This will terminate the entire program. If you are using many objects in memory it will be better to redirect the program to a function that releases the objects and eventually 'End's the program

Cheers
Shasur

kiwidancer · September 29th, 2009, 02:37 PM

thanks, Shasur

I ended up having to change it a bit, but it works now :)
I can't believe I couldn't find the simple end command anywhere online!!!

Code:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = 0 Then
        End
    End If
End Sub