分かりやすく、使いやすく。

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

スポンサーリンク

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

  1. 情報ダイアログ(メッセージボックス)
  2. エラーダイアログ(メッセージボックス)
  3. 警告ダイアログ(メッセージボックス)
  4. 質問ダイアログ(メッセージボックス)


【関連】
Yes/No ダイアログを使用する方法
Yes/No/Cancel ダイアログを使用する方法

情報ダイアログ(メッセージボックス)

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 
スポンサーリンク
スポンサーリンク