Boolean user prompt

[patl]

In my VBA code, i would like to make a popup that gives the user a message and promps them to click yes or no. How can i do this, then how do i access the response from VBA? Thanks a lot for any help you guys can give me.

 

[DonkeyOte]

Sub Marine()

M1 = msgbox("Click Yes or No",vbyesno,"Click")
Select Case M1
Case vbyes
...do something...
Case vbno
...do something...
End Select

End Sub

 

[VoG]

Try this

Sub test()
Dim response As VbMsgBoxResult
response = MsgBox("Click Yes or No", vbYesNo)
If response = vbYes Then
    MsgBox "Pressed Yes"
Else
    MsgBox "Pressed No"
End If
End Sub

 

[patl]

perfect, thanks!