Excel VBAエキスパート資格・ベーシック試験対策の問題集に出題している「関数 MsgBox」の解説ページです。
目次
MsgBox関数の使い方
Excel VBAのMsgBox 関数は、メッセージボックスを表示するために使用します。
特定の情報をユーザーに表示したり、確認を求めたりするのに役立ちます。主な目的は、ユーザーに対してメッセージを表示し、必要に応じてそのメッセージに対するユーザーの反応を取得することです。
MsgBox(文字列,ボタンとアイコン、タイトル)
' メッセージを表示する
MsgBox "これはメッセージボックスの例です。", vbInformation, "タイトル"
' ボタンとアイコンの種類を指定してメッセージを表示する
Dim response As VbMsgBoxResult
response = MsgBox("YesかNoを選択してください。", vbYesNo + vbQuestion, "質問")
' ユーザーの選択に応じて条件分岐する
If response = vbYes Then
' Yesが選択された場合の処理
MsgBox "Yesが選択されました。", vbInformation, "結果"
Else
' Noが選択された場合の処理
MsgBox "Noが選択されました。", vbInformation, "結果"
End If
MsgBox関数ボタンに関する定数の使い方
vbOkOnly
メッセージボックスに "OK" ボタンのみを表示します。`vbOkOnly` を使用することで、ユーザーは"OK"をクリックするか、[Enter] を押すことでメッセージボックスを閉じることができます。
vbOkCancel
"OK" と "キャンセル" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーは 2 つのボタンのいずれかを選択してメッセージボックスを閉じることができます。
vbAbortRetryIgnore
"中止"、"再試行"、"無視" の 3 つのボタンを持つメッセージボックスを表示します。ユーザーはこれらの選択肢から1つを選んで対応するアクションを選択します。
vbYesNo
"はい" と "いいえ" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーはそれぞれのアクションに対して "はい" か "いいえ" のいずれかを選択します。
vbRetryCancel
"再試行" と "キャンセル" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーはそれぞれのアクションに対して "再試行" か "キャンセル" のいずれかを選択します。
vbDefaultButton1、vbDefaultButton2、vbDefaultButton3
デフォルトのボタンを指定するための定数です。`vbDefaultButton1` は最初のボタンを、`vbDefaultButton2` は 2 番目のボタンを、`vbDefaultButton3` は 3 番目のボタンをデフォルトで選択状態にします。
' メッセージボックスに"OK"ボタンのみを表示し、デフォルトでは"キャンセル"ボタンを選択状態にする
Dim response As VbMsgBoxResult
response = MsgBox("続行しますか?", vbOKCancel + vbDefaultButton2, "確認")
If response = vbOK Then
' "OK" ボタンが選択された場合の処理
MsgBox "続行します。", vbInformation, "結果"
Else
' "キャンセル" ボタンが選択された場合の処理
MsgBox "キャンセルされました。", vbInformation, "結果"
End If
MsgBox関数アイコンに関する定数の使い方
vbCritical
エラーや重大な問題を表す赤いバツのアイコンを表示します。ユーザーに対して注意が必要な状況を示します。
vbQuestion
質問を表す青いクエスションマークのアイコンを表示します。ユーザーに質問を投げかけるようなメッセージに使われます。
vbExclamation
注意や警告を表す黄色いエクスクラメーションマークのアイコンを表示します。ユーザーに対して注意が必要な状況を示します。
vbInformation
情報を示す青い i マークのアイコンを表示します。ユーザーに対して情報を提供する場合に使われます。
' エラーを示すメッセージボックスを表示
MsgBox "エラーが発生しました。", vbCritical, "エラー"
' ユーザーに質問を提示するメッセージボックスを表示
MsgBox "続行しますか?", vbQuestion + vbYesNo, "確認"
' 注意を促すメッセージボックスを表示
MsgBox "続行する前に注意が必要です。", vbExclamation, "警告"
' 情報を提供するメッセージボックスを表示
MsgBox "処理が完了しました。", vbInformation, "結果"
MsgBox関数の戻り値の使い方
vbOk
OK ボタンが押されたことを示します。
vbCancel
キャンセル ボタンが押されたことを示します。
vbAbort
中止 ボタンが押されたことを示します。
vbRetry
再試行 ボタンが押されたことを示します。
vbIgnore
無視 ボタンが押されたことを示します。
vbYes
Yes ボタンが押されたことを示します。
vbNo
No ボタンが押されたことを示します。
' メッセージボックスを表示し、ボタンの選択を判断する
Dim userResponse As Integer
userResponse = MsgBox("続行しますか?", vbYesNo, "確認")
' ユーザーの選択に応じた処理を実行する
If userResponse = vbYes Then
' Yes ボタンが選択された場合の処理
MsgBox "続行します。"
Else
' Yes ボタン以外が選択された場合の処理
MsgBox "中止します。"
End If
関数 MsgBox|記憶定着問題集
操作方法:1.●●●をクリック(スマホはタップ)で答え表示。2.答えをクリック(スマホはタップ)で●●●表示。1⇔2を繰り返すことで、記憶を定着できます。
MsgBox(●●●,●●●、●●●)
MsgBox関数ボタンに関する定数
●●● メッセージボックスに "OK" ボタンのみを表示します。●●● を使用することで、ユーザーは"OK"をクリックするか、[Enter] を押すことでメッセージボックスを閉じることができます。 ●●● "OK" と "キャンセル" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーは 2 つのボタンのいずれかを選択してメッセージボックスを閉じることができます。 ●●● "中止"、"再試行"、"無視" の 3 つのボタンを持つメッセージボックスを表示します。ユーザーはこれらの選択肢から1つを選んで対応するアクションを選択します。 ●●● "はい" と "いいえ" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーはそれぞれのアクションに対して "はい" か "いいえ" のいずれかを選択します。 ●●● "再試行" と "キャンセル" の 2 つのボタンを持つメッセージボックスを表示します。ユーザーはそれぞれのアクションに対して "再試行" か "キャンセル" のいずれかを選択します。 ●●● デフォルトのボタンを指定するための定数です。●●● は最初のボタンを、●●● は 2 番目のボタンを、●●● は 3 番目のボタンをデフォルトで選択状態にします。' メッセージボックスに"OK"ボタンのみを表示し、デフォルトでは"キャンセル"ボタンを選択状態にする
Dim response As VbMsgBoxResult
response = MsgBox("続行しますか?", ●●● + ●●●, "確認")
If response = ●●● Then
' "OK" ボタンが選択された場合の処理
MsgBox "続行します。", ●●●, "結果"
Else
' "キャンセル" ボタンが選択された場合の処理
MsgBox "キャンセルされました。", ●●●, "結果"
End If
MsgBox関数アイコンに関する定数
●●● エラーや重大な問題を表す赤いバツのアイコンを表示します。ユーザーに対して注意が必要な状況を示します。 ●●● 質問を表す青いクエスションマークのアイコンを表示します。ユーザーに質問を投げかけるようなメッセージに使われます。 ●●● 注意や警告を表す黄色いエクスクラメーションマークのアイコンを表示します。ユーザーに対して注意が必要な状況を示します。 ●●● 情報を示す青い i マークのアイコンを表示します。ユーザーに対して情報を提供する場合に使われます。' エラーを示すメッセージボックスを表示
MsgBox "エラーが発生しました。", ●●●, "エラー"
' ユーザーに質問を提示するメッセージボックスを表示
MsgBox "続行しますか?", ●●● + vbYesNo, "確認"
' 注意を促すメッセージボックスを表示
MsgBox "続行する前に注意が必要です。", ●●●, "警告"
' 情報を提供するメッセージボックスを表示
MsgBox "処理が完了しました。", ●●●, "結果"
MsgBox関数の戻り値
●●● OK ボタンが押されたことを示します。 ●●● キャンセル ボタンが押されたことを示します。 ●●● 中止 ボタンが押されたことを示します。 ●●● 再試行 ボタンが押されたことを示します。 ●●● 無視 ボタンが押されたことを示します。 ●●● Yes ボタンが押されたことを示します。 ●●● No ボタンが押されたことを示します。' メッセージボックスを表示し、ボタンの選択を判断する
Dim userResponse As Integer
userResponse = MsgBox("続行しますか?", ●●●, "確認")
' ユーザーの選択に応じた処理を実行する
If userResponse = ●●● Then
' Yes ボタンが選択された場合の処理
MsgBox "続行します。"
Else
' Yes ボタン以外が選択された場合の処理
MsgBox "中止します。"
End If
Excel VBAのスキルを身につけて、仕事の効率化に貢献しませんか?
当サイトでは、Excel VBAエキスパート認定資格取得に向けた情報を提供しています。興味がある方は、ぜひ以下の問題集からチャレンジしてみてください。
ExcelVBAエキスパートベーシックは、業務効率をあげるためにExcelVBAを利用する人が対象の問題集です。