OKボタンだけのダイアログを使用する方法

Excel VBA で「OK」ボタンだけのメッセージボックスを表示するには、 MsgBox に vbOKOnly を指定します。

vbOKOnly と一緒に vbInformation を指定すると情報を意味するアイコン付きでダイアログが表示されます。

OKダイアログ（情報）

VBA（実行可能なサンプルコード）
1 2 3 4 5	Option Explicit Sub test() Call MsgBox("〇〇です。", vbOKOnly + vbInformation, "タイトルに表示する文字列") End Sub

vbOKOnly と一緒に vbCritical を指定すると致命的なエラーを意味するアイコン付きでダイアログが表示されます。

OKダイアログ（エラー）

VBA（実行可能なサンプルコード）
1 2 3 4 5	Option Explicit Sub test() Call MsgBox("〇〇です。", vbOKOnly + vbCritical, "タイトルに表示する文字列") End Sub

vbOKOnly と一緒に vbExclamation を指定すると警告を意味するアイコン付きでダイアログが表示されます。

OKダイアログ（警告）

VBA（実行可能なサンプルコード）
1 2 3 4 5	Option Explicit Sub test() Call MsgBox("〇〇です。", vbOKOnly + vbExclamation, "タイトルに表示する文字列") End Sub

vbOKOnly と一緒に vbQuestion を指定すると質問を意味するアイコン付きでダイアログが表示されます。

OKダイアログ（質問）

VBA（実行可能なサンプルコード）
1 2 3 4 5	Option Explicit Sub test() Call MsgBox("〇〇です。", vbOKOnly + vbQuestion, "タイトルに表示する文字列") End Sub