|  

» Use messageboxes using VBA in Microsoft Excel

VBA macro tip contributed by Erlandsen Data Consulting offering Microsoft Excel Application development, template customization, support and training solutions
Here are some examples on how to use the MsgBox-function:

MsgBox "The job is done !" 
' messagebox with text and OK-button
MsgBox "The job is done !", vbInformation
' messagebox with text, OK-button and an information-icon
MsgBox "The job is done !", vbCritical
' messagebox with text, OK-button and a warning-icon
MsgBox "The job is done !", vbInformation, "My Title"
' messagebox with text, OK-button, information-icon and a custom title text


Answer = MsgBox("Do you want to continue ?", vbYesNo)
' messagebox with YES- and NO-buttons, 
' the result is an integer, the constants are named vbYes and vbNo.
Answer = MsgBox("Do you want to continue ?", vbYesNo + vbQuestion)
' messagebox with YES- and NO-buttons and a question-icon
Answer = MsgBox("Do you want to continue ?", vbYesNo + vbQuestion, "My Title")
' messagebox with YES- and NO-buttons, 
' question-icon and a custom title text
Answer = MsgBox("Do you want to continue ?", vbYesNo + 256 + vbQuestion, "My Title")
' messagebox with YES- and NO-buttons, question-icon and a custom title text, 
' the NO-button is default
Answer = MsgBox("Do you want to continue ?", vbOKCancel, "My Title")
' messagebox with OK- and CANCEL-buttons, the result is an integer, 
' the constants are named vbOK og vbCancel.

The result from the MsgBox-function can be stored in a variable. The variable can be of type Integer.
This variable may be used later in the macro code like this:

Answer = MsgBox("Do you want to continue ?", _
    vbOKCancel, "My Title")
If Answer = vbCancel Then Exit Sub ' the macro ends if the user selects the CANCEL-button
Or like this:
If MsgBox("Do you want to continue ?", vbOKCancel, _
    "My Title") = vbCancel then Exit Sub




Rate This Tip
12 34 5
Rating: 3.97     Views: 168421
No comments have been submitted.
Click here to post comment
For Registered Users
Name
Comment Title
Comments