Access2013のVBAでフォームを閉じるボタンを作成します。
前回「コントロールウィザードを使い、フォームを閉じるボタンを追加する」を掲載しましたが、コントロールウィザードではマクロで作成されます。
マクロよりはVBAの方が後々、メンテナンス性がいいのでこちらをお勧めします。
１．フォームのデザインビューで、リボンの［フォームデザインツール］－［デザイン］－［ボタン］を選択します。
２．フォームにドラッグし配置します。
コマンドボタンウィザードが表示された場合は［キャンセル］をクリックします。
ボタンを選択した状態で、プロパティシートの［書式タブ］－［標題］に「終了」等の文字を入力します。
プロパティシートの［イベントタブ］－［クリック時］の「▼」をクリックし、「イベントプロシージャ」を選択します。
横の［・・・］ボタンをクリックします。
クリックイベントのコードが入力された、VBE画面が開きます。
Private Sub コマンド＊_Click()
End Sub
の間に
DoCmd.Close acForm, "F_顧客マスター"
と入力します。
フォームの実行画面です。
［終了］ボタンをクリックするとフォームが閉じます。
