Yes or No Box then run macro

  • Thread starter Thread starter amorrison2006
  • Start date Start date
A

amorrison2006

Hi

I have two macros,

I want to run a macro based on whether the user clicks yes to a
question or no to a question,

I do not know how to make this message popup on screen,

Can someone help?

Thanks

Andrea
 
Hi,
I want to run a macro based on whether the user clicks yes to a
question or no to a question,

I do not know how to make this message popup on screen,
Click to expand...

Like this:

Sub AskQuestion
If Msgbox("Turn Left?",vbyesNo+vbQuestion)=vbYes Then
TurnLeft
Else
TurnRight
End If
End Sub

Sub TurnLeft()
Msgbox "Going to the left!"
End Sub

Sub TurnRight()
Msgbox "Going to the right!"
End Sub

Regards,

Jan Karel Pieterse
Excel MVP
http://www.jkp-ads.com
Member of:
Professional Office Developer Association
www.proofficedev.com
 
One way is to paste this into a module and put a button on your worksheet to
call it:-

Sub answerme()
msg = "Answer YES or NO"
response = MsgBox(msg, vbYesNo)
If response = vbYes Then
MsgBox ("You clicked YES")
'Run the yes macro
Else
MsgBox ("You clicked NO")
'Run the no macro
End If
End Sub

Mike
 
Hi

Thanks for the response,

The first option was what I needed as the macro works with multiple
files. Only one problem so far,

When my macro is looping through the questions the window does not
refresh so the question windows appears behind the other one when it
has been clicked.....Where can I add a window refresh so the box
disappears when the question has been answered,

Many thanks,

Andrea
 
Sub MyQuestion()
If MsgBox("Yes or No?", vbYesNo + vbQuestion) <> vbYes Then
MsgBox "No Macro"
Else
MsgBox "Yes Macro"
End If
End Sub
 
Hi

This does not answer my previous question about the updating of the
questions to refresh the screen,

Can someone else help?

Andrea
 
Application.screenupdating = true
will refresh the screen.

Turn it back to false when you want to hide the flickering.
 
Like:

application.screenupdating = true
resp = msgbox...
application.screenupdating = false
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Message box with Yes or No option 6
Answering Pop questions when macro is running 2
If checkbox ticked then skip if statements and run macro 1
major errors with macro code - VB question constantly doing "ELSE" part of if statement 2
How to make a macro run every fifth minute 1
Yes/No message box appears based on cell's value and its selectionproduces a value 4
Worksheet CLOSE related macros 4
open a workbook without running Workbook_Open macro in E2007 10

Back
Top