Exit all subs

[boc_est1986]

I have a user form that is called from inside a sub. I want to stop all code running if the user form is just deactivated. Obviously putting exit sub in the user form deactivate just stops that sub but when it goes back to the calling function it continues to run. Is there a way of ending all code or passing a vaiable back from the form in the parent funtion?

[DonkeyOte]

Perhaps you mean

Please Login or Register  to view this content.

eg:

Please Login or Register  to view this content.

[boc_est1986]

i have tried this but by using end in in sub two sub three is still called. End only works on that sub and the sub one will then continue to excecute the rest of the code after it

[DonkeyOte]

Without seeing your own code it's hard to pass comment, but using my example - if you run Sub one() and click "Yes" on subsequent MsgBox Sub three() is not invoked (no "Invoked" dialog is generated).

[boc_est1986]

This is the code for the main sub

Please Login or Register  to view this content.

here is the code for the user form

Please Login or Register  to view this content.

how do pass response back from the form to the main sub

[DonkeyOte]

You would use the Terminate Event, ie:

Please Login or Register  to view this content.

No need to pass variable back to main routine if you intend to just exit the code altogether.

[boc_est1986]

ok thanks its working now

[Andy Pope]

Be careful of the use of End. It will reset all module/project level variables.

The problem is that the response variable is local to the caller routine.
You either need to use a public variable or a private variable within the userform that you can read.

public variable approach.

Please Login or Register  to view this content.