how to stop running procedure or function with vba

[MBMSOFT]

I need to stop already ran procedure or function with vba code
So I use END command ans everything stops.. in some cases that is usefull , but some times need I to do something else after I use END command, but after END everything stops...

LIKE THIS :

SUB ()
END
ME.CTL.SETFOCUS
'OR
CALL function
EXIT SUB

ANY IDEA TO SOLVE THIS
THANKS IN ADVANCE

 

[vbaInet]

I'm not sure I understand MBMSOFT.

You can use Exit Sub to prematurely exit a function. If you don't always want to exit the function you can put it in an IF statement with some condition.

 

[MBMSOFT]

It is onother function or procedure or some loop let say started on loading form ... so i want to quit them with some button and start something else...

 

[vbaInet]

VBA is single threaded so you can't do this. The only way you can somewhat do it is with a boolean variable and the timer.

 

[MBMSOFT]

VBA is single threaded so you can't do this. The only way you can somewhat do it is with a boolean variable and the timer.

Ok... i'll try that way...

 

[vbaInet]

Or if you're using a form, here's a suggestion from GinaWhipp:

http://www.access-programmers.co.uk/forums/showthread.php?t=266814