Dans cet article, nous allons apprendre la boîte de messages dans vba.

Voici des exemples de msgbox vba excel sur la façon d’utiliser la msgbox dans Excel:

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.

Le résultat de la fonction MsgBox-VBA peut être stocké dans une variable.

La variable peut être de type Integer.

Cette variable peut être utilisée plus tard dans le code de macro comme ceci:

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

Ou comme ça:

If MsgBox("Do you want to continue ?", vbOKCancel, _

"My Title") = vbCancel then Exit Sub