メッセージボックスを表示(MsgBox関数)
2015/03/22
MsgBox関数
result = MsgBox ( Prompt [ , Buttons, Title, Helpfile, Context ] )
【引数】
- Prompt ・・・ 表示する文字列
- Buttons ・・・ ボタンの種類・個数・アイコンのスタイル等(省略可)
- Title ・・・ ダイアログボックスのタイトルバーに表示する文字列(省略可)
- Helpfile ・・・ ヘルプファイルのファイル名(省略可)
- Context ・・・ ヘルプトピックに指定したコンテキスト番号(省略可)
【戻値】
- result ・・・ ユーザーが選択したボタンに対応する定数
引数 Prompt に複数行を指定する場合は、キャリッジリターン(Chr(13))、ライン フィード (Chr(10))、またはキャリッジ リターンとライン フィードの組み合わせ (Chr(13) & Chr(10)) を改行位置に挿入します。
引数 Buttons を省略すると、既定値 vbOKOnly(0) になり、「OK」ボタンのみ表示されます。
引数 Title を省略すると、「Microsoft Excel」となります。
引数 Helpfile に、使用するヘルプファイルの名前を使用することで [F1] キーを押してヘルプを参照できるようになります。このとき 引数 Context も指定する必要があります。
ボタンの種類・個数・スタイルを示す定数の一覧(Bottons)
表示するボタン
定数 | 値 | 表示するボタン |
vbOKOnly 【規定値】 | 0 | [OK] ボタンのみ |
vbOKCancel | 1 | [OK] ボタンと [キャンセル] ボタン |
vbAbortRetryIgnore | 2 | [中止] [再試行] [無視] の 3 つのボタン |
vbYesNoCancel | 3 | [はい] [いいえ] [キャンセル] の 3 つのボタン |
vbYesNo | 4 | [はい] ボタンと [いいえ] ボタン |
vbRetryCancel | 5 | [再試行] ボタンと [キャンセル] ボタン |
アイコンの種類
定数 | 値 | 表示するアイコン |
vbCritical | 16 | 警告メッセージ アイコンを表示 |
vbQuestion | 32 | 問い合わせメッセージ アイコンを表示 |
vbExclamation | 48 | 注意メッセージ アイコンを表示 |
vbInformation | 64 | 情報メッセージ アイコンを表示 |
デフォルトのボタン
定数 | 値 | デフォルトのボタン |
vbDefaultButton1 【規定値】 | 0 | 第 1 ボタン |
vbDefaultButton2 | 256 | 第 2 ボタン |
vbDefaultButton3 | 512 | 第 3 ボタン |
vbDefaultButton4 | 768 | 第 4 ボタン |
その他
定数 | 値 | 内容 |
vbApplicationModal【規定値】 | 0 | アプリケーションモーダルに設定 |
vbSystemModal | 4096 | システムモーダルに設定 |
vbMsgBoxHelpButton | 16384 | ヘルプ ボタンを表示 |
VbMsgBoxSetForeground | 65536 | 最前面のウィンドウとして表示 |
vbMsgBoxRight | 524288 | テキストを右寄せで表示 |
vbMsgBoxRtlReading | 1048576 | テキストを、右から左の方向で表示 |
MsgBox関数の戻り値(result)
定数 | 値 | 内容 |
vbOK | 1 | [OK] |
vbCancel | 2 | [キャンセル] |
vbAbort | 3 | [中止] |
vbRetry | 4 | [再試行] |
vbIgnore | 5 | [無視] |
vbYes | 6 | [はい] |
vbNo | 7 | [いいえ] |
MsgBox関数の使用例
VBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Sub sample_msgbox() Dim Result, Prompt, Buttons, Title Prompt = "メッセージボックスの使用例です。" & Chr(13) & "続行しますか?" Buttons = vbYesNoCancel + vbInformation + vbDefaultButton2 Title = "メッセージボックス使用例" Result = MsgBox(Prompt, Buttons, Title) If Result = vbYes Then MsgBox "YES" ElseIf Result = vbNo Then MsgBox "NO" Else MsgBox "CANCEL" End If End Sub |
MsgBox関数のマクロ実行例
関連記事
-
-
Join 関数(配列の要素を結合)
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
ショートカットメニュー(CommandBar オブジェクト)
ショートカットメニュー(コンテキストメニュー) 右クリックで表示されるメニューの …
-
-
CPU に制御を移す(DoEvents 関数)
DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …
-
-
カレントフォルダ(CurDir 関数、ChDir ステートメント、ChDrive ステートメント)
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
色の設定(Color プロパティ・RGB 関数)
Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …
-
-
エラー(CVErr 関数・IsError 関数・Error 関数)
CVErr 関数(エラー番号をエラー値に変換する)の使い方 【書式】 retur …
-
-
文字列:アルファベットを小文字または大文字に変換(LCase 関数,UCase 関数)
LCase 関数・UCase 関数 の使い方 【書式】 <アルファベットの大文字 …
-
-
列挙型変数(Enum ステートメント)
列挙型変数を使う 列挙型変数を使用するには、Enum ステートメントを使って、宣 …
-
-
VBA の演算子(算術演算子)
算術演算子 算術演算を行うときに使用する演算子です。 ^(べき乗)、*(積)、/ …
-
-
VBA の演算子(論理演算子:And、Eqv、Imp、Not、Or、Xor)
論理演算子 論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …