導入：なぜMsgBoxの見た目にこだわる必要があるのか？
実務でマクロを組む際、単に「処理が終わりました」と表示するだけでは、ユーザーは「何が完了したのか」「エラーなのか成功なのか」を即座に判断できません。MsgBox関数は、適切にアイコンやタイトルを使い分けることで、プログラムの状態を直感的に伝える強力なツールになります。今回は、現場で信頼されるマクロにするための、MsgBoxの装飾テクニックを解説します。
基礎知識：MsgBox関数の基本構造
MsgBox関数は、単にメッセージを表示するだけでなく、ボタンの種類やアイコンを指定することができます。基本的な書式は以下の通りです。
MsgBox(メッセージ, ボタンの種類 + アイコンの種類, タイトル)
この「ボタン」と「アイコン」の組み合わせが非常に重要です。これらを適切に設定することで、ユーザーへの警告や確認の質が劇的に向上します。
実装/解決策：現場で使える3つのパターン
実務では、以下の3つのパターンを状況に応じて使い分けます。
1. 完了報告（情報通知）
処理が正常に終了したことを伝えます。「vbInformation」を使用します。
2. エラー警告
処理が失敗した際、ユーザーに注意を促します。「vbCritical」を使用します。
3. ユーザーへの確認
「はい」「いいえ」ボタンを表示し、ユーザーの判断を仰ぎます。「vbQuestion + vbYesNo」を使用します。
サンプルプログラム：そのまま使える実用コード
以下のコードを標準モジュールにコピーして、各処理を確認してみてください。
Sub ShowMessageExamples()
‘ 1. 完了報告（アイコン：情報）
MsgBox “バックアップが完了しました。”, vbInformation, “処理完了”
‘ 2. エラー報告（アイコン：警告）
MsgBox “ファイルの保存に失敗しました。権限を確認してください。”, vbCritical, “エラー発生”
‘ 3. ユーザー確認（はい・いいえ）
‘ 戻り値を変数に格納して分岐させるのが実務の基本です
Dim result As VbMsgBoxResult
result = MsgBox(“データを上書きしますか？”, vbQuestion + vbYesNo, “確認”)
If result = vbYes Then
MsgBox “上書き処理を実行します。”, vbInformation
Else
MsgBox “処理をキャンセルしました。”, vbExclamation
End If
End Sub
応用・注意点：現場で陥りやすい罠
・ユーザーの混乱を避ける
「vbCritical（エラー）」アイコンを、単なる完了報告に使用してはいけません。ユーザーが「何か重大な問題が起きたのか？」と不安になってしまいます。アイコンは、そのメッセージの「意味」に合わせて選ぶのがマナーです。
・タイトルを省略しない
第3引数のタイトルを省略すると、デフォルトで「Microsoft Excel」と表示されます。ツール名や処理内容をタイトルに入れることで、複数のマクロが動いている場合でも、どのマクロからのメッセージか一目で分かるようになります。
・ボタン判定の重要性
「はい」「いいえ」を選択させる場合、必ず変数（VbMsgBoxResult型）でユーザーの選択を受け取ってください。選択結果を無視したまま処理を進めると、意図しない操作でデータを破損させるリスクがあります。
MsgBox一つとっても、工夫次第でマクロの「品質」は大きく変わります。ぜひ明日からの業務で活用してみてくださいね。
