VBAメッセージボックス「MsgBox」の設定方法

2年 ago
海斗, 葵
1 minute

MsgBox 関数は VBA でメッセージ ボックスを表示するために使われる関数で、ユーザーにメッセージを表示してユーザーのレスポンスを待機するために使用できます。

MsgBox関数を使用する場合は、以下のパラメータを設定することでメッセージボックスの見た目や挙動をカスタマイズできます。

  1. 表示するメッセージのテキスト（必須）。文字列定数、変数、または式にもできます。
  2. OKのみ
  3. 「OK」と「キャンセル」ボタンを表示します
  4. 中止、再試行、無視のボタンを表示します
  5. 「はい」「いいえ」「キャンセル」ボタンを表示する
  6. 「はい」「いいえ」ボタンを表示する
  7. [リトライ]と[キャンセル]ボタンを表示
  8. メッセージ ボックスのタイトル バーに表示するタイトル テキスト (省略可能)。文字列定数、変数、式でもかまいません。
  9. ヘルプファイルとヘルプトピックを指定するためのオプションのパラメータ。
  10. 本ボタンをＯＫボタンが押された
  11. ユーザーが「キャンセル」をタップした
  12. ユーザーがキャンセルボタンを押した。
  13. ユーザーが「再読み込み」ボタンをクリックしました
  14. 無視する(ユーザーが「無視」ボタンをクリックしました)
  15. ユーザーが「はい」ボタンをクリックする
  16. ユーザーが「いいえ」ボタンをクリックしました

メッセージボックスの外観と動作の設定方法の例を以下に示します。

Sub MsgBoxExample()
    Dim result As Integer
    result = MsgBox("这是一条示例消息", vbYesNoCancel + vbInformation, "示例标题")
    
    Select Case result
        Case vbYes
            MsgBox "用户点击了“是”按钮"
        Case vbNo
            MsgBox "用户点击了“否”按钮"
        Case vbCancel
            MsgBox "用户点击了“取消”按钮"
    End Select
End Sub

上記例で、関数MsgBoxの引数１つは表示するテキスト、２つ目はボタンの種類（vbYesNoCancel + vbInformationは”はい”、“いいえ”、“キャンセル”ボタンと情報アイコンを表示）、３つ目はメッセージボックスのタイトルです。実行結果のSelect Case構文では、ユーザーがクリックしたボタンにより異なる情報を表示します。

bannerAds