MSG BOX

liam_conor

Board Regular
Joined
Oct 9, 2002
Messages
180
I have a userform with a list box and commandbutton. The list box shows all the existing worksheets in my workbook. The user selects the desired worksheet and clicks the command button to travel to it. After they have traveled to the worksheet a Yes/No MSG Box pops up and asks the user if this is the correct worksheet...Question: How do I write a loop that will continually show this MSG Box until they have selected the No option on the MSG Box.
 

Excel Facts

Show numbers in thousands?
Use a custom number format of #,##0,K. Each comma after the final 0 will divide the displayed number by another thousand

shaikhiy

Board Regular
Joined
Jul 24, 2002
Messages
52
Heh!

looks as if you are about to play a trick on someone!!

It is possible, you jsut need to have it so when the yes box is chosen, it does nothing, but then when the no button is chosen it unloads the userform.

hope this helps
 

liam_conor

Board Regular
Joined
Oct 9, 2002
Messages
180
Sorry, I want it to be continually shown until the Yes option is chosen.


Sub ShowAllSheetBox()

' ShowAllSheetBox Macro
' Macro recorded 10/22/2002 by CWorkman
Dim Msg, Style, Title, Response
'Shows the UserForm1
UserForm1.Show
Msg = "Is this the JSA you wanted?"
'Message to display
Style = vbYesNo
'Display a Yes and a No button
Title = "CONFIRMATION..."
Response = MsgBox(Msg, Style, Title)
Style = vbOKOnly
Title = "User Response ..."
If Response = vbYes Then
Msg = "Yes"
Response = MsgBox("End Search", Style, Title)
Else: Msg = "No"
' Shows the user form again
UserForm1.Show
End If

End Sub
 

Forum statistics

Threads
1,143,919
Messages
5,721,536
Members
422,369
Latest member
redinator

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top