Solved: How to insert "Are you sure? -> Yes/No" in code

[sunilmulay]

How can I insert a simple: "Are you sure? -> Yes/No" sub within an existing macro, so that if a user clicks on the control linked to the macro, it pops up a dialog box with buttons for Yes and No, with Yes executing the Macro and No aborting it?
Thanks

[Demosthine]

Good Evening.

Try this.

[VBA]
Private Sub cmdDelete_Click()
Dim intResponse as Integer

intResponse = MsgBox("Are you sure?", vbYesNo, "Delete?")

Select Case intResponse
Case vbYes
' Process commands.
Case vbNo
Exit Sub
End Select
End Sub
[/VBA]

Scott

[sunilmulay]

thank you!