2017年9月13日

【Access】VBAでAccessを終了する



VBAでAccessを終了する方法です。

書式

DoCmd.Quit [オプション]

[オプション]は、次の3つから選びます。
acQuitPrompt・・・保存してない場合は確認のダイアログを表示する(デフォルト)
acQuitSaveAll・・・自動的に保存
acQuitSaveNone・・・保存せず終了


下記は、フォーム上の「終了」ボタンをクリックするとAccessが終了する例です。



「終了」ボタン(buttonEnd)のクリック時イベントプロシージャに下記のマクロを入力します。

Private Sub buttonEnd_Click()

    DoCmd.Quit acQuitPrompt
    
End Sub



スポンサーリンク