Return to original Subroutine

[jyellis]

I have Sub Click() the calls a Show_form that loads a form;

userform1 loads; then I want that sub userform_activate() to return back to sub Click() and run the sub Copy_All. How do I get it to return to the Sub click() and execute where it left off.

Example:
sub Click()

Show_form

Copy_All

Print_Report

unload userform1

end

Thanks in advance

 

[erik.van.geit]

Hi,

if in your userformcode you have
Me.Hide
or
Unload Me

the code will continue after the line with
UserForm1.Show

example

Sub Click()
Show_form
Copy_All
Print_Report
Unload UserForm1
End Sub

Sub Show_form()
UserForm1.Show
End Sub

Sub Copy_All()
MsgBox "Copy_All running"
End Sub

userform code

Private Sub CommandButton1_Click()
Me.Hide
End Sub

kind regards,
Erik