メッセージボックスで［はい］を選んだときだけフォームを閉じる方法

Accessのフォームで［閉じる］ボタンを設置してもメッセージボックスは表示されず、フォームはそのまま閉じられてしまいます。

［閉じる］ボタンをクリックしたらメッセージボックスを表示し、［はい］が押されたときのみフォームを閉じるように設定できます。

埋め込みマクロでの手順と、MsgBox関数についても解説します。

ここでは［閉じる］ボタンで解説しますが、他のコマンド実行時でも同様に設定できます。

フォームに［閉じる］ボタンを設置

フォームに［閉じる］ボタンを作成します。

ここで使用するフォームは、以下の記事で作成したものです。

フォームをデザインビューで開いて、［フォームデザイン］タブの［コントロール］グループにある［ボタン］をクリックしてボタンを挿入します。

［コマンドボタンウィザード］が表示されたら、［キャンセル］をクリックして閉じます。

コマンドボタンのプロパティシートを表示して、［書式］タブの［標題］に、ボタンへ表示する名前を入力します。

ここでは［閉じる］と入力します。

［F4］キーを押すとプロパティシートを表示できます。

参考ここでは、ウィンドウの表示は、既定の［タブ付きドキュメント］にしています。

埋め込みマクロの作成

コマンドボタンを選択して、プロパティシートを表示します。

［イベント］タブの［クリック時］にある［ビルダー選択］（［…］）をクリックします。

［ビルダーの選択］ダイアログボックスで［マクロビルダー］を選択して、［OK］ボタンをクリックします。

マクロデザインが表示されます。

［新しいアクションの追加］の▼をクリックして、［If］を選択します。

テキストボックスに次のように入力します。

または、次のように入力します。

条件式のすぐ下にある［新しいアクションの追加］から［ウィンドウを閉じる］を選択します。

これでメッセージボックスの戻り値が［6］の場合、アクション［ウィンドウを閉じる］が実行されます。

［オブジェクトの種類］の指定を省略すると、現在表示中のウィンドウが閉じられます。

“CloseWindow/ウィンドウを閉じる“ マクロ アクション - Microsoft サポート（Microsoft）

設定が正しく入力されていることを確認し、上書き保存して閉じます。

コマンドボタンのクリック時のプロパティには、［埋め込みマクロ］と表示されています。

［F5］キーを押してフォームビューに切り替えます。

［閉じる］ボタンをクリックすると、以下のメッセージボックスが表示されます。

先に［ウィンドウを閉じる］ボタンを設置していた場合

ウィンドウを閉じるボタンは、コマンドウィザードでも作成できます。

コマンドボタンウィザードで［フォームの操作］と［フォームを閉じる］を選択すると、コマンドボタンを作成できます。

先にコマンドボタンを作成していても、［If］の条件式を追加できます。

以下は、コマンドボタンウィザードで［フォームを閉じる］を選択して作成したボタンのマクロツールです。

［新しいアクションの追加］で［If］を選択して、条件式を入力します。

そして、［If］を選択し、［上へ移動］ボタンをクリックします。

以下のようになりますので、［ウィンドウを閉じる］を選択し、［上へ移動］ボタンをクリックします。

この状態になれば完了です。

参考マクロアクションは、アクションカタログから既存のマクロアクションを追加できます。別のフォームで同じマクロアクションを使用したい場合は、再利用するのが効率的です。

MsgBox関数について

MsgBox関数は、メッセージボックスを表示して、クリックされたボタンの戻り値に応じてアクションを実行します。

詳細は、以下のMicrosoftの記事を参照してください。

MsgBox 関数 - Microsoft サポート（Microsoft）

MsgBoxの構文は以下のようになります。［メッセージ］以外は省略可能です。

［ボタンやアイコン］は、［ボタンの種類］+［アイコンの種類］+［標準のボタンの指定］で合計値を指定できます。

メッセージボックスでは、次のように表示されます。

ボタンの種類

アイコンの種類

数値	種類
16	警告
32	問い合わせ
48	注意
64	情報

標準のボタンの指定

標準のボタンとは、メッセージボックスを表示したときに選択された状態になるボタンのことです。

戻り値

戻り値が指定された値以外の場合、アクションは実行されずメッセージボックスが閉じられます。

参考MsgBox構文で省略できないメッセージのみにすると、以下のようなメッセージボックスになります。

ただし、データベースのアプリケーションタイトルを設定している場合は、それがメッセージボックスの［タイトル］として表示されます。

アプリケーションタイトルについては、以下で解説しています。

メッセージボックスは、アプリケーションパーツから作成することもできます。