【入門編】Application.GetOptionで「名前の自動修正」をVBAで一時的に無効化するリスク回避 – Access VBA解析バイブル

Access VBA

2026.08.26

こんにちは。Accessの迷宮を探索する皆さんの道標として、今日は少し「玄人好み」でありながら、避けては通れない「名前の自動修正（Name AutoCorrect）」という機能についてお話しします。

「なぜかデータベースが異常に重い」「テーブルをいじると勝手にリンクが切れる」。そんな悩みを抱えたことはありませんか？その犯人は、Accessの親切心が生んだ副作用かもしれません。

今日は、業務自動化のプロが必ず仕込む「名前の自動修正をVBAで手なずける」テクニックを伝授します。

—

Accessには、テーブルやクエリの名前を変えたときに、それを使っているフォームやレポートの参照先を「気を利かせて」自動で書き換えてくれる機能があります。

一見便利ですが、実は大規模なデータ処理や頻繁なテーブル操作を行うシステムでは、パフォーマンスの低下とファイル肥大化の最大の原因になります。Accessが裏で一生懸命「整合性をチェックし続ける」ため、メモリとCPUを浪費してしまうからです。

プロの現場では、「大規模な処理の前には、この機能を一時的にOFFにする」のが鉄則です。

—

`Application.GetOption`と`Application.SetOption`を使えば、Accessの設定をプログラムから書き換えることができます。

以下のコードは、処理の開始前に機能をオフにし、終了後に元の状態へ戻す「安全なシェル（殻）」です。

Public Sub RunHeavyProcess()
‘ 現在の名前の自動修正設定を保存（退避用）
Dim originalSetting As Boolean
originalSetting = Application.GetOption(“Name AutoCorrect”)

On Error GoTo ErrorHandler

‘ 1. 名前の自動修正を無効化（パフォーマンス爆速化！）
Application.SetOption “Name AutoCorrect”, False

‘ — ここに重いテーブル操作やクエリ実行を書く —
Debug.Print “重い処理を実行中…”
‘ DoCmd.RunSQL “…”
‘ ——————————————–

MsgBox “処理が完了しました。”, vbInformation

Cleanup:
‘ 2. 処理が終わったら必ず元の設定に戻す（これ重要！）
Application.SetOption “Name AutoCorrect”, True
Exit Sub

ErrorHandler:
MsgBox “エラーが発生しました: ” & Err.Description, vbCritical
Resume Cleanup
End Sub

`GetOption`と`SetOption`: Accessのオプションダイアログにある設定を直接叩いています。
「必ず元に戻す（Cleanup）」: ここがプロとアマの分かれ道です。エラーで止まった時でも`Resume Cleanup`で必ず設定を戻すように書くことで、データベースの整合性を守ります。
例外処理（On Error GoTo）: 自動化において「エラーが起きても設定が戻る」ことは、システム運用上の生命線です。

—

初心者のうちは「ずっとOFFでいいじゃん！」と思うかもしれません。しかし、名前の自動修正を恒久的にOFFにすると、後からフィールド名を変えた際に、フォーム側のエラー（名前が見つかりません！）を自分で一つずつ直す羽目になります。

この使い分けが、「Accessの機能を使いこなしつつ、システムを壊さない」ための極意です。

—

もしエラーハンドリングを怠り、設定をOFFにしたままにすると、以下のような事故が起きます。

だからこそ、先ほどのコードのように「処理の始まりと終わりでサンドイッチする」スタイルが、最も安全で賢いやり方なのです。

—

Access VBAの真の強みは、「Accessという巨大なアプリケーションの挙動を、コードから自在にコントロールできること」にあります。

`Application`オブジェクトを操作できるようになれば、あなたはもう単なる「マクロ記録の延長」から脱却し、立派なシステムアーキテクトの道を歩み始めています。

もし今日紹介したコードで、「もっとこんな処理と組み合わせたい」という疑問が浮かんだら、それはあなたが成長している証拠です。ぜひ、自分の環境で一度試してみてください。Accessの反応速度が、驚くほど変わるはずですよ。

それでは、次回の記事でも「現場で使える泥臭い知恵」を共有していきます。ハッピー・コーディング！