ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Exiting Sub when Selecting Cancel on vbOKCancel (https://www.excelbanter.com/excel-discussion-misc-queries/144593-exiting-sub-when-selecting-cancel-vbokcancel.html)

Rob

Exiting Sub when Selecting Cancel on vbOKCancel
 
Hi Again,

How would I make it to where if I select cancel from this msxbox...

MsgBox "Do You Want to Run the Activation/De-Activation Code Checker?",
vbOKCancel

....it exits the sub and does not perform anything else within the sub?
Right now if I select cancel it still finishes the sub. Any help would be
great.

Thanks Much,
Rob

Dave Peterson

Exiting Sub when Selecting Cancel on vbOKCancel
 
Dim Resp as long
resp = msgbox(Prompt:="do you want...", buttons:=vbokcancel)
if resp = vbcancel then
exit sub
end if
'keep going

Rob wrote:

Hi Again,

How would I make it to where if I select cancel from this msxbox...

MsgBox "Do You Want to Run the Activation/De-Activation Code Checker?",
vbOKCancel

...it exits the sub and does not perform anything else within the sub?
Right now if I select cancel it still finishes the sub. Any help would be
great.

Thanks Much,
Rob


--

Dave Peterson

Dave O[_2_]

Exiting Sub when Selecting Cancel on vbOKCancel
 
Rob-
As written your code pops up a message box with a prompt for the user,
and nothing happens when you click Cancel because there is no code to
accommodate any activity. By declaring a variable to hold the user's
answer, you can then act on it- try adding code like this:

Dim Response As String 'variable to hold user's answer
Response = MsgBox("Do You Want to Run the Activation/De-Activation
Code Checker?", vbOKCancel)
If Response = vbCancel Then
End
End If

You may want to use a vbYesNo instead of vbOKCancel, since that is a
slightly more intuitive answer to your "do you want to run this"
question.

Dave O



Dave O[_2_]

Exiting Sub when Selecting Cancel on vbOKCancel
 
Rob-
As written your code pops up a message box with a prompt for the user,
and nothing happens when you click Cancel because there is no code to
accommodate any activity. By declaring a variable to hold the user's
answer, you can then act on it- try adding code like this:

Dim Response As String 'variable to hold user's answer
Response = MsgBox("Do You Want to Run the Activation/De-Activation
Code Checker?", vbOKCancel)
If Response = vbCancel Then
End
End If

You may want to use a vbYesNo instead of vbOKCancel, since that is a
slightly more intuitive answer to your "do you want to run this"
question.

Dave O



Dave O[_2_]

Exiting Sub when Selecting Cancel on vbOKCancel
 
Rob-
As written your code pops up a message box with a prompt for the user,
and nothing happens when you click Cancel because there is no code to
accommodate any activity. By declaring a variable to hold the user's
answer, you can then act on it- try adding code like this:

Dim Response As String 'variable to hold user's answer
Response = MsgBox("Do You Want to Run the Activation/De-Activation
Code Checker?", vbOKCancel)
If Response = vbCancel Then
End
End If

You may want to use a vbYesNo instead of vbOKCancel, since that is a
slightly more intuitive answer to your "do you want to run this"
question.

Dave O



Rob

Exiting Sub when Selecting Cancel on vbOKCancel
 
Thanks Bunches!!

Rob

"Dave O" wrote:

Rob-
As written your code pops up a message box with a prompt for the user,
and nothing happens when you click Cancel because there is no code to
accommodate any activity. By declaring a variable to hold the user's
answer, you can then act on it- try adding code like this:

Dim Response As String 'variable to hold user's answer
Response = MsgBox("Do You Want to Run the Activation/De-Activation
Code Checker?", vbOKCancel)
If Response = vbCancel Then
End
End If

You may want to use a vbYesNo instead of vbOKCancel, since that is a
slightly more intuitive answer to your "do you want to run this"
question.

Dave O




Dave O[_2_]

Exiting Sub when Selecting Cancel on vbOKCancel
 
Rob-
As written your code pops up a message box with a prompt for the user,
and nothing happens when you click Cancel because there is no code to
accommodate any activity. By declaring a variable to hold the user's
answer, you can then act on it- try adding code like this:

Dim Response As String 'variable to hold user's answer
Response = MsgBox("Do You Want to Run the Activation/De-Activation
Code Checker?", vbOKCancel)
If Response = vbCancel Then
End
End If

You may want to use a vbYesNo instead of vbOKCancel, since that is a
slightly more intuitive answer to your "do you want to run this"
question.

Dave O




All times are GMT +1. The time now is 11:52 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com