Accssのオプション内にある「閉じるときに最適化する」は、Access2000からの機能でOnにしておけば毎回終了時、最適化するので大変便利ですが、サイズが大きくなると終了までにいらいらすることがあります。このいらいらを回避するため、トップページから最適化するかを制御できれば、そのつど最適化を選択し実施できるようになります。

AccessVBAから「閉じるときに最適化する」を制御するには
Application.SetOption("Auto Compact", True)
を使用します。

サンプルダウンロード