Macro Yes / No

[hcabs99]

Hi All

I have a macro set up which runs a number of queries etc from a button click on a form.

Would like the user to be given a message box pop up to be asked if he wishes to continue. If yes, then it should continue to run the macro. If no, then it should stop

Am using Access 2010, i understand that this process has been simplified in this version, but I've not been able to get this to work!

Any help would be appreciated

Cheers

 

[Joe4]

Macros are very limited and not really interactive (at least not without incorporating some VBA into it).
Access has a create utility that will convert your Macros to Visual Basic code (take a look at the Macros Menu/Ribbon). Use this to convert your Macros to VBA. Then you can edit that code and add your MsgBox and an IF ... THEN clause.

Then you can run this VBA code from a myriad of different ways. I often like to use a Command Button on a Form, or attach the code to the ****** event of some Form (so that it runs whenever a Form is opened). If I want it to run automatically, then I just make that Form the Startup Form for my database.
You might also be able to run it using the "RunCode" Macro action.

 

[hcabs99]

Macros are very limited and not really interactive (at least not without incorporating some VBA into it).
Access has a create utility that will convert your Macros to Visual Basic code (take a look at the Macros Menu/Ribbon). Use this to convert your Macros to VBA. Then you can edit that code and add your MsgBox and an IF ... THEN clause.

Then you can run this VBA code from a myriad of different ways. I often like to use a Command Button on a Form, or attach the code to the ****** event of some Form (so that it runs whenever a Form is opened). If I want it to run automatically, then I just make that Form the Startup Form for my database.
You might also be able to run it using the "RunCode" Macro action.

Hi Joe,
Thanks for your help,

I'm aware of the function to covert to code and have been playing with this to make it work,

I want the user to be asked if he wishes to continue and have the Yes / No box now, however i'm not sure how to stop all macros running if No is selected.

Function TestMacro1()
On Error GoTo TestMacro1_Err

DoCmd.SetWarnings False
Beep
MsgBox "Do you wish to continue?", 4, ""
DoCmd.OpenQuery "Create_Buying_List_Prt4", acViewNormal, acEdit


TestMacro1_Exit:
Exit Function

TestMacro1_Err:
MsgBox Error$
Resume TestMacro1_Exit

End Function

 

[ScottR]

You can set conditional responses to message box queries as follows

If MsgBox("Do you want to do stuff?", vbYesNo) = vbYes Then
    'Do Stuff
Else
    'Don't do that stuff
End If

 

[Joe4]

Here is an example of code that will exit the whole VBA code if they elect No.

    myCheck = MsgBox("Do you wish to continue", vbYesNo)
    If myCheck = vbNo Then Exit Sub

 

[hcabs99]

You can set conditional responses to message box queries as follows

If MsgBox("Do you want to do stuff?", vbYesNo) = vbYes Then
    'Do Stuff
Else
    'Don't do that stuff
End If

perfect, thanks v much for your help!

 

[ascrit]

You can set conditional responses to message box queries as follows

If MsgBox("Do you want to do stuff?", vbYesNo) = vbYes Then
    'Do Stuff
Else
    'Don't do that stuff
End If

This totally helped me with a question that I had as well.

Thanks so much!!