VBAでメッセージボックス(MsgBox)を表示させる方法

MsgBox関数を使ってメッセージを表示する方法です

基本の書式は下記の通りです。
MsgBox （表示文字列　，[ボタン書式]　，[タイトル]）
　
表示文字列：表示したい文字列を入力(省略不可)。複数行を設定するときは，
　　　　　　　　改行する位置に，,VbCrLfを挿入します。
ボタン書式：表示するボタンの種類，使用するアイコンのスタイル，標準ボタン等の値
　　　　　　　　の合計値です。省略時は[OK]ボタンのみ表示。
タイトル　：メッセージボックスのタイトルバーに表示する文字列です。
　　　　　　　省略時はアプリケーション名が表示されます。

■アイコン
定数　　　　　　　 　内容
vbCritical　　　　　　警告メッセージアイコン
vbQuestion　　 　 　問い合わせメッセージアイコン
vbExclamation　 　 注意メッセージアイコン
vbinformation　　　 情報メッセージアイコン

■ボタン
定数　　　　　　　　　 　内容
vbOKonly　　　　　 　　　[OK]ボタンのみ表示
vbOKCancel　　　　　 　[OK] [キャンセル] ボタン表示
vbAbortRetryignore　　[中止] [再試行] [無視] ボタン表示
vbYesNoCancel　　　 　[はい] [いいえ] [キャンセル] ボタン表示
vbYesNo　　　　　　　 　[はい] [いいえ] ボタン表示
vbRetryCancel 　　　　[再試行 ] [キャンセル ] ボタン表示

■標準ボタン
定数　　　　　　　 　内容
vbDefaultButton1　　第１ボタンを標準ボタンにする
vbDefaultButton2　　第２ボタンを標準ボタンにする
vbDefaultButton3　　第３ボタンを標準ボタンにする

-----------------------------------------------------------------------
【サンプルコード】　
　　MsgBox "警告メッセージを表示します。", vbCritical, "警告"

　　MsgBox "無視ボタンを標準ボタンに設定しました。" _
　　　　　　　　　 & VbCrLf& "ここで改行して表示します。" _
　　　　　　　　　, vbAbortRetryIgnore + vbInformation + _
　　　　　　　　　vbDefaultButton3, "標準ボタンの設定例"
-----------------------------------------------------------------------

MsgBox関数の戻り値を利用して条件分岐

MsgBox関数の戻り値を利用して条件分岐できます。表示されたダイアログボックス上で選択されたボタンの種類を，戻り値を使って，次に実行する処理を分岐します。
■戻り値
定数　　　　　　　内容
vbOK　　　　　　　　　　[OK]ボタン
vbCancel 　　　　　　　[キャンセル] ボタン
vbAbort　　　　　 　　　[中止] ボタン
vbRetry　　　　　　　　[再試行] ボタン
vbignore　　　　　 　　[無視] ボタン
vbYes　　　　　　　　　[はい] ボタン
vbNo　　　　　　 　　　[いいえ] ボタン

------------------------------------------------------------------------
【サンプルコード】
　　　If vbYes = MsgBox("はいボタンを押してください。", vbYesNo, "終了確認") Then
　　　　　　MsgBox "OK"
　　　Else
　　　　　　MsgBox "押し間違えましたね。"
　　End If
------------------------------------------------------------------------

サンプルを作成していますので、下記よりご自由にダウンロードして下さい。


------------------------------------------------------------------------

EXCEL VBA xls Excel2003