これらは、メッセージボックス関数の引数Buttonsの値を変更することで、他のパターンも表示できます。
以下、引数Bottonsの内容だけ変更するので、その部分だけ記載します。
もとになるマクロは、メッセージボックスのボタンを変更する の冒頭に記載した、「MSGBOX_Buttons_例」です。
【ボタンの表示例】
myStyle = vbOKCancel Or vbInformation
![みんなのワードマクロ](https://stat.ameba.jp/user_images/20110425/07/gidgeerock/41/be/p/t02200166_0320024111186231373.png?caw=800)
【ボタンの表示例】
myStyle = vbYesNoCancel Or vbQuestion
![みんなのワードマクロ](https://stat.ameba.jp/user_images/20110425/07/gidgeerock/45/d9/p/t02200120_0443024111186231375.png?caw=800)
【ボタンの表示例】
myStyle = vbRetryCancel Or vbExclamation
![みんなのワードマクロ](https://stat.ameba.jp/user_images/20110425/07/gidgeerock/6a/0e/p/t02200166_0320024111186231374.png?caw=800)
この場合、メッセージボックスの表示とともに、vbExclamationに連動して警告音が鳴ります。
【ボタンの表示例】
myStyle = vbAbortRetryIgnore Or vbCritical
![みんなのワードマクロ](https://stat.ameba.jp/user_images/20110425/07/gidgeerock/a0/5f/p/t02200120_0443024111186232347.png?caw=800)
この場合にも、 vbCriticalに連動して別の警告音が鳴ります。
【解説】
お気づきの通り、ボタンとアイコンとの組み合わせで、上記のようなパターンを作っています。
組み合わせ自体は自由にしてかまいませんので、いろいろとお試しください。
説明文は、VBE のヘルプからそのままコピーしました。
▼ボタン:
vbOKOnly [OK] ボタンのみを表示します。
vbOKCancel [OK] ボタンと [キャンセル] ボタンを表示します。
vbAbortRetryIgnore [中止]、[再試行]、[無視] の 3 つのボタンを表示します。
vbYesNoCancel [はい]、[いいえ]、[キャンセル] の 3 つのボタンを表示します。
vbYesNo [はい] ボタンと [いいえ] ボタンを表示します。
vbRetryCancel [再試行] ボタンと [キャンセル] ボタンを表示します。
▼アイコン:
vbCritical 警告メッセージ アイコンを表示します。
vbQuestion 問い合わせメッセージ アイコンを表示します。
vbExclamation 注意メッセージ アイコンを表示します。
vbInformation 情報メッセージ アイコンを表示します。
警告音入りのメッセージボックスだと、ちょっとインパクトがあってデモのしがいがあります。
▼関連記事
メッセージボックスの目次
マクロコードの登録方法