2つめの引数を記述します。Subカンマを記述すると、入力補助がでます。上下でvbYesNoを選択してTabを押します。Enterを押すと開業されてしまうので注意しましょう。引数の名前から想像できるかもしれませんが、これはボタンを表しています。vbOKOnly]と書いてありました。これは、第二引数が省略されたときは「OK」のボタンだけ表示させますよ、と言う事だったんですね。「はい」を押して閉じるとイミディエイトウィンドウに6が表示されました。一度実行してみましょう。今度は「いいえ」を押してみます。今度はイミディエイトウィンドウに7が表示されました。このように戻り値の値が異なります。vbOKCancelなど、いろいろと試してみましょう。実はvbYesNoなどは数値としての値を持っていて、足し算をする事ができます。次のコードをを試してみましょう。Sub実行してみます。~く目を凝らして見て下さい。今度は「いいえ」のボタンに影がついています。先ほどは「はい」のボタンに影がついていました。vbDefaultButton2でいいえをデフォルトにするこれはどういうことかというと、デフォルトで「いいえ」が選択されていると言う事です。マウスの操作では無く、Enterを押したときに押されるボタンと言う事ですね。これらの引数を使い、戻り値を使って条件分岐すれば次のようなことができます。MsgBox("選択したファイルが最新ではありません。"キャンセルしました。Sub引数を使った応用イメージとしてはユーザーが誤ったファイルを選択し、それを検知した際に表示されるメッセージです。vbExclamationでびっくりマークを表示して警告を促しつつ、デフォルトで「いいえ」が選択されているので、Enterを押すと処理が中断される、と言う内容です。ユーザーフレンドリーですね。中級から上級へのステップアップに必要なのは経験と思いやりでした。これは、最新でないファイルで作業を続行し、思いも寄らない結果が出ることを防いでいます。一つ引数について触れます。Excel」の文字が変更できます。先ほどのコードをさらに変更します。MsgBox("選択したファイルが最新ではありません。"キャンセルしました。Subユーザーフレンドリーなメッセージボックスいい感じですね。分かりやすくなりました。3つめのHelpFileとContextは普通のユーザーには関係ない引数なので無視してOKです。これで、「ファイルを選択して下さい」でキャンセルや「×」を押したときの処理も記述できますね!「OK」が押されなかった時の処理をIf文で導いてあげればOKです。それでは、メッセージボックスでいろいろな引数を試して、エラーを防ぎつつユーザーフレンドリーなツールに仕上げていきましょう。MsgBoxは関数VBAで便利なMsgBox関数があります。ワークブックにチェック機能をつける今回はVBAで利用できるイベントについて解説していきます。日)1985年生まれの会社員。業務改善部隊に異動で芽を出し、現在に至る。本業での知識と経験を元に、ブログとTwitterで1生産性向上2業務改善3自動化について情報発信しています。【プログラミング】文法の勉強だけでは遠回り|挫折しない上達のコツ月別アーカイブはてなブログをはじめよう!mutable_yunさんは、はてなブログを使っています。ブログを報告するスターをつけました引用をストックしましたストック一覧を見る閉じる引用するにはまずログインしてくださいログイン閉じる引用をストックできませんでした。再度お試しください閉じる限定公開記事のため引用できません。