Accessの「名前の自動修正」という甘い罠：VBAで制御する極限の安定化術
こんにちは。現場でAccessと格闘する皆さんの「頼れる先輩」として、今日は少し深遠な話をしましょう。
Accessには「名前の自動修正（Name AutoCorrect）」という機能があります。テーブルの名前を変えたら、それを使っているクエリやフォームも勝手に直してくれる……一見、魔法のように便利な機能ですよね。
しかし、プロの現場では、この機能は「百害あって一利なし」として即座に無効化するのが定石です。なぜか？ それは、Accessが常に「あちこちの名前が整合しているか」を裏で監視し続け、システム全体のパフォーマンスを低下させ、さらに「予期せぬタイミングで勝手にクエリを壊す」という爆弾を抱えているからです。
今日は、この「名前の自動修正」をVBAから制御し、堅牢なシステムを構築するための極意を伝授します。
—
なぜ「名前の自動修正」が危険なのか？
この機能がONになっていると、Accessはすべてのオブジェクトの変更をログとして追跡します。大規模なデータベースになると、このログの書き込みだけでディスクI/Oを圧迫し、処理が目に見えて重くなります。
さらに恐ろしいのは、「いつの間にか意図しない修正が行われ、クエリのSQLがめちゃくちゃになる」という事態です。本番環境でこれをやらかすと、原因究明に数日かかることもあります。
—
VBAで「名前の自動修正」を掌中に収める
それでは、実際にコードを見ていきましょう。`Application.GetOption` と `Application.SetOption` を使えば、この機能をVBAから自在に操れます。
【極意】設定を操作する汎用プロシージャ
以下のコードを標準モジュールにコピーして使ってください。現在の状態を確認し、安全に無効化するプロセスです。
‘ ———————————————————
‘ 名前の自動修正機能を制御するユーティリティ
‘ ———————————————————
Public Sub ToggleAutoCorrect(ByVal blnEnable As Boolean)
‘ 定数：名前の自動修正に関連するオプションID
Const OPT_NAME_AUTOCORRECT = 143
Const OPT_TRACK_NAME_AUTOCORRECT = 144
On Error GoTo Err_Handler
‘ 現在の設定をログに出力（デバッグ用）
Debug.Print “現在の設定: ” & Application.GetOption(“Name AutoCorrect”)
‘ 名前を自動修正する機能をON/OFF
Application.SetOption “Name AutoCorrect”, blnEnable
‘ 変更の追跡をON/OFF
Application.SetOption “Track Name AutoCorrect Info”, blnEnable
MsgBox “名前の自動修正機能を ” & IIf(blnEnable, “有効”, “無効”) & ” にしました。”, vbInformation
Exit Sub
Err_Handler:
MsgBox “設定の変更に失敗しました: ” & Err.Description, vbCritical
End Sub
コードの解説：ここがエンジニアのこだわり
1. Application.SetOption: これはAccessの「オプション」ダイアログをプログラムで操作する命令です。
2. なぜ2つの設定をいじるのか？: 実は「名前の自動修正」には「機能そのもの」と「変更履歴を追跡する機能」の2段階があります。両方を確実にOFFにすることで、システム負荷を最小限に抑えるのがプロの作法です。
3. エラーハンドリング: `On Error GoTo` を忘れてはいけません。万が一設定変更が拒否された場合でも、プログラムがクラッシュしないようにガードを固めるのが、堅牢なシステムを作る第一歩です。
—
現場で使うときの「黄金のルール」
このVBAコードを、いつ実行すべきでしょうか？
- 開発の初期段階: データベースを作成したら、まずは手動でこの機能をOFFにしてください（「ファイル」→「オプション」→「現在のデータベース」）。
- 配布前の最終チェック: 現場で配布するファイルが確実にこの設定になっているか、起動時（`AutoExec`マクロやフォームの`Load`イベント）にこのVBAを走らせて「強制的にOFF」にすることをお勧めします。
「プログラムがプログラムの状態を制御する」。これができるようになったら、あなたはもう初学者ではありません。システム全体のライフサイクルを管理できる「エンジニア」の入り口に立っています。
—
最後に：怖がらず、制御せよ
Accessの機能は、時に「お節介」です。しかし、そのお節介をVBAで手懐けることができれば、Accessは驚くほど軽量で、かつ強固な業務基盤へと変貌します。
今日紹介したコードは、現場のエンジニアにとっての「お守り」のようなものです。ぜひあなたのプロジェクトにも組み込んで、安定したAccessライフを築いてください。
また何か疑問があれば、いつでも聞いてくださいね。一緒に最高の自動化ツールを作り上げましょう！
