Command Button in msgbox vba possible?

Question

si it possible to add a command button in the msgbox window in vba?

For example, i want to add a cancel button that stops the code rather than continuing it. I could create a new userform, but it would be nice if i save some space and use the msgbox that is already here.

Did you not even bother *looking* at what IntelliSense is telling you as you type `MsgBox(`? — Mathieu Guindon, Aug 21 '17 at 19:28

score 4 · Accepted Answer · edited Aug 21 '17 at 18:48

VBA has several different types of MessageBoxes with built in command buttons for this very purpose. The type of buttons included in the message box is declared as the second parameter - MsgBox(Prompt, Buttons as)

The types you are probably interested in are:

vbYesNo
vbYesNoCancel
vbAbortRetryIgnore
vbOkCancel
vbRetryCancel

These Buttons return integer values that need to either be stored or used for comparison.

VBA has these integer answers stored as constants (e.g. vbOK = 1, VbCancel = 2, etc.) See Microsoft Developer Network MsgBox Function for more details on that.

Sub mySub()

Dim answer as Integer

answer = MsgBox("Would you like to choose yes?", vbYesNoCancel)

If answer = vbYes Then
   'Do whatever you want
ElseIf answer = vbNo Then
   'Do whatever
Else
   Exit Sub
End If

End Sub

Thanks a lot. your answer was very helpful!! – wwla Aug 22 '17 at 13:07 — wwla, Aug 22 '17 at 13:07

score 0 · Answer 2 · answered Aug 21 '17 at 18:21

0

Try this:

If MsgBox("Cancel or Continue, are you sure?", vbOKCancel) = vbOK Then
     'continue whatever you want to do.
End if

answered Aug 21 '17 at 18:21

pokemon_Man

902
1
9
25

Command Button in msgbox vba possible?

2 Answers2