Access VBAの限界を突破せよ：IN句の動的生成を葬り去る「一時テーブルJOIN戦略」
Access VBAで開発を行っていると、避けて通れないのが「ユーザーが選択した複数のIDでデータを抽出したい」という要件だ。多くの初学者は、ここでSQL文字列を愚直に連結し、`IN (1, 2, 3…)` を生成するという誘惑に駆られる。
だが、言っておく。その設計は今すぐ捨てろ。
文字列連結によるSQL構築は、コードの可読性を殺し、SQLインジェクションのリスクを招き、さらにはクエリプランのキャッシュ効率を最悪にする。プロフェッショナルは、文字列をいじらない。「構造」で解決するのだ。
今回は、DAO.QueryDefの限界を突破し、堅牢かつ高速な抽出を実現する「一時テーブルJOIN戦略」を伝授する。
—
なぜ「文字列連結によるIN句生成」は悪手なのか
1. セキュリティリスク: ユーザー入力を直接SQLに埋め込むのは、SQLインジェクションへの招待状だ。
2. クエリプランの断片化: `IN (1, 2)` と `IN (1, 2, 3)` は全く別のSQLとして扱われる。データベースエンジンは毎回新しいクエリとして解析を行うため、大規模データではパフォーマンスが崩壊する。
3. 保守性の欠如: `Replace` や `Split` を駆使した複雑な文字列操作は、半年後の自分を地獄に突き落とす。
—
究極の解：一時テーブルによるセマンティック・マッピング
解決策はシンプルだ。抽出したい値を「配列」や「コレクション」のまま扱うのではなく、「抽出対象のみを格納した物理的な一時テーブル」に流し込み、メインのテーブルと内部結合（JOIN）させる。
これにより、SQLは常に固定化され、パラメータクエリの恩恵を最大限に受けられる。
実装コード：プロダクションレベルの設計
このコードは、再利用可能な汎用関数として設計している。
‘ 必要な参照設定: Microsoft DAO 3.6 Object Library 以上
Public Sub ExecuteDynamicExtraction(targetIds As Variant)
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Dim strSql As String
Set db = CurrentDb
‘ 1. 一時テーブルのクリアとデータ投入
‘ ※ tbl_TempFilter はあらかじめ作成しておいたID格納用のローカルテーブル
db.Execute “DELETE FROM tbl_TempFilter”, dbFailOnError
Dim id As Variant
Dim rs As DAO.Recordset
Set rs = db.OpenRecordset(“tbl_TempFilter”, dbOpenDynaset)
For Each id In targetIds
rs.AddNew
rs!FilterID = id
rs.Update
Next id
rs.Close
‘ 2. JOINによる抽出（SQLは固定化されており非常に堅牢）
‘ QueryDefを介することで、パラメータ化の恩恵を享受できる
strSql = “SELECT T. FROM T_MainTable AS T ” & _
“INNER JOIN tbl_TempFilter AS F ON T.ID = F.FilterID”
Set qdf = db.CreateQueryDef(“”, strSql)
‘ 3. 結果の利用
Set rs = qdf.OpenRecordset()
‘ … ここでレコードセットを処理する …
rs.Close
qdf.Close
Set rs = Nothing
Set qdf = Nothing
End Sub
—
この設計が「現場」で最強である理由
1. データベースエンジンの最適化
`INNER JOIN` を使用することで、クエリエンジンはインデックスを最大限に活用できる。特に `FilterID` にインデックスを貼っておけば、数万件のIDリストであっても一瞬で抽出が完了する。
2. 実行計画の固定化
動的SQLと異なり、`strSql` は常に不変だ。Access（JET/ACEエンジン）は最初の実行時に最適化された実行計画をキャッシュし、2回目以降のオーバーヘッドを劇的に削減する。
3. トランザクションと整合性
もしマルチユーザー環境であれば、`tbl_TempFilter` を「ユーザー個別のセッションID」で識別するか、あるいはDAOの `TemporaryTable` （※Accessでは一時テーブルの管理に注意が必要だが）を利用することで、競合を完全に回避できる。
—
エンジニアへの助言
実務において、コードの「賢さ」とは、いかにトリッキーなアルゴリズムを書くかではない。「いかに将来のバグ発生源を潰し、読み手に意図を明確に伝えるか」にある。
今回紹介した「一時テーブルJOIN戦略」は、一見すると手順が多いように見えるかもしれない。しかし、複雑な文字列操作から解放され、堅牢なデータ処理を担保できるこの手法こそが、大規模な基幹システムでも通用する「プロの作法」だ。
Accessは古いツールではない。使い手がそのポテンシャルを引き出せば、依然として最強の高速開発プラットフォームであり続ける。さあ、今すぐ文字列連結のコードを削除し、この設計に書き換えろ。現場の安定度が劇的に変わるはずだ。
