Microsoft ExcelでVBAを使用してメッセージボックスを使用し
この記事では、vbaのメッセージボックスについて学習します。
Excelでmsgboxを使用する方法に関するexcelvbamsgboxの例を次に示します。
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.
MsgBox-VBAfunctionの結果は、変数に格納できます。
変数は整数型にすることができます。
この変数は、後で次のようにマクロコードで使用できます。
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
またはこのように:
If MsgBox("Do you want to continue ?", vbOKCancel, _ "My Title") = vbCancel then Exit Sub