メッセージボックスを表示[MsgBox関数]｜CATIAマクロの作成方法

今回はVBAの中でも超基本となる『MsgBox関数』についての内容です。
メッセージの表示は簡単に書けて、しっかりとマクロが動いていることも目視で確認することができるため、VBA初心者が1番初めに学んでおくべき処理となっています。

今回学べる内容は以下のとおりです。

MsgBox関数の使い方(メッセージボックスを表示する方法)

MsgBox関数

『MsgBox関数』とはメッセージボックスを使ってメッセージを表示することのできる関数です。
これによりマクロの次の操作指示や、マクロの終了をユーザーに知らせることができます。

メッセージボックスを表示するには以下の構文を使います。

MsgBox関数

MsgBox (prompt, [ buttons ], [ title ],[ helpfile, context ])
※[]で囲まれているものは省略可

※helpfile, context は使う機会があまりないためここでの説明は割愛します。
興味のある方は「MsgBox helpfile」等で検索してみて下さい。

promptの部分にはメッセージの本文を入力します。
以下のようにダブルクォーテーション[“]で文字列を囲むことで、その文字列をメッセージとして表示することができます。

MsgBox関数(prompt)①

Sub Test()
　MsgBox “Hello World”
End Sub

上記のコードをVBEのモジュール内に入力し、実行することで以下のようにメッセージボックスを表示することができます。

　
また、promptの入力は変数で行うこともできます。
たとえば以下のように書いても、上記と同じ結果を得ることができます。

MsgBox関数(prompt)②

Sub Test()
　Dim STR As String
STR = “Hello World”
　MsgBox STR
End Sub

これは「STR」という文字列型の変数に「Hello World」という文字列を入れ、MsgBox関数でその変数の中身を表示するという流れになっています。

MsgBox関数では以下のように、メッセージボックスのボタンのタイプを変更したり、アイコンを追加したりすることが出来ます。こういった変更を行いたい場合はbuttonsで設定を行います。

※buttonsの入力は必須ではないため何も書かないで省略することもできます。
　省略した場合は「OK」ボタンのみでアイコン無しのメッセージボックスとなります。

ボタン/アイコンを設定する場合はbuttonsの部分に以下の表から、表示したいボタン/アイコンのコードを入力します。(表の「定数」の欄に書かれている「vbOKOnly」や「vbOKCancel」などのこと)

MsgBox関数(buttons)①

MsgBox (“Hello World”,vbYesNo + vbInformation)

たとえば上記のコードの場合、[はい] ボタンと [いいえ] ボタンがあり、[情報メッセージ] アイコンのついた以下のようなメッセージボックスを開くことができます。

※上記のコードのままではエラーが発生してメッセージボックスを開くことはできません。

ボタンを設定する際は、押されたボタンの結果を受けとるための[変数]が必要になってきます。
以下のように書くことでエラーが発生することなく、設定したボタン/アイコンのついたメッセージボックスを開くことができます。

MsgBox関数(buttons)②

Sub Test()
　Dim Response As Integer
Response = MsgBox (“Hello World”,vbYesNo + vbInformation)
End Sub

押されたボタンによって変数Responseには以下の表どおりに「値」が代入されます。