Trong bài viết này, chúng ta sẽ tìm hiểu hộp tin nhắn trong vba.

Đây là các ví dụ về msgbox trong excel vba về cách sử dụng msgbox trong 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.

Kết quả từ chức năng MsgBox- VBA có thể được lưu trữ trong một biến.

Biến có thể có kiểu Integer.

Biến này có thể được sử dụng sau này trong mã macro như sau:

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

Hoặc như thế này:

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

"My Title") = vbCancel then Exit Sub