[Maria[_7_]]

Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria

[Bob Phillips[_6_]]

Maria,

Try this

Private Sub cmdCancel_Click()
Unload Me
End
End Sub

--

HTH

RP

"Maria" wrote in message
...
Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria

[N10]

IS this also appropriate and is it equivalent


Me.HIDE
Set Userform1 = Nothing

Best N10


"Bob Phillips" wrote in message
...
Maria,

Try this

Private Sub cmdCancel_Click()
Unload Me
End
End Sub

--

HTH

RP

"Maria" wrote in message
...
Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria

[Maria[_7_]]

Hi Bob,

that's it.

Thank you.
Maria

-----Original Message-----
Maria,

Try this

Private Sub cmdCancel_Click()
Unload Me
End
End Sub

--

HTH

RP

"Maria" wrote in
message
...
Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria


.

[Bob Phillips[_6_]]

NO, the code in the calling procedure still continues after this executed.

--

HTH

RP

"N10" wrote in message
...
IS this also appropriate and is it equivalent


Me.HIDE
Set Userform1 = Nothing

Best N10


"Bob Phillips" wrote in message
...
Maria,

Try this

Private Sub cmdCancel_Click()
Unload Me
End
End Sub

--

HTH

RP

"Maria" wrote in message
...
Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria

[Dave Peterson[_3_]]

I think I'd use a boolean variable and set/check that:

In a General module:

Dim OkToContinue as boolean
Sub test()
' Some Code
oktocontinue = true
Call UserForm1
if oktocontinue = false then
exit sub
end if
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
oktocontinue = false
Exit Sub
End Sub

The End statement may do more than what you want--if you use global variables,
you'll see that they've been reset.



Maria wrote:

Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria

--

Dave Peterson

[N10]

Thanks for the calrification Bob

Best N10

"Bob Phillips" wrote in message
...
NO, the code in the calling procedure still continues after this executed.

--

HTH

RP

"N10" wrote in message
...
IS this also appropriate and is it equivalent


Me.HIDE
Set Userform1 = Nothing

Best N10


"Bob Phillips" wrote in message
...
Maria,

Try this

Private Sub cmdCancel_Click()
Unload Me
End
End Sub

--

HTH

RP

"Maria" wrote in message
...
Hi,

I have a Procedure and a UserForm.
On the UserForm is the Button "Cancel".
When I click this button I would like to quit
the UserForm AND stop running the other procedure.

Sub test()
' Some Code
Call UserForm1
' Some more Code <-- Do not run when quit UserForm
End Sub

Unfortunately this doesn't work:

Private Sub cmbCancel_Click()
Unload Me
Exit Sub
End Sub

What can I do to really leave both?

Thank you for helping me.
Maria