皆さん、こんにちは。現場で役立つVBA活用術をお届けします。今回は、AccessからExcelを操作する「オートメーション」についてお話しします。
多くの現場では、Accessで集計したデータをExcelに出力して、そのまま上司への報告資料や社内共有用として配布することが多いはずです。ここで重要なのは、単にデータを貼り付けるだけでなく、「いかにエラーを回避し、スマートに制御するか」という点です。
なぜ「CreateObject」を使うべきか
VBAでExcelを操作する際、参照設定からExcelのライブラリを選択する方法もあります。しかし、実務ではあえて「Late Binding（遅延バインディング）」、つまりCreateObject関数を使うことを強く推奨します。
理由の一つは、配布したAccessファイルが、相手の環境（Officeのバージョン）に依存して「参照設定の欠落エラー」を起こすリスクをゼロにできるからです。現場では、自分と相手の環境が同じとは限りません。この手法は、トラブルを未然に防ぐためのプロの作法です。
Excelを「影」で操り、最後に表舞台へ出す
コードを書く際、つい最初に「objExcel.Visible = True」と記述していませんか？実はこれ、少しだけ工夫が必要です。
Excelを起動した直後に表示してしまうと、画面がチラついたり、セルの選択状態が目に見えてしまい、動作が重くなります。実務的なコードの書き方は以下の通りです。
1. オブジェクトを生成し、処理を行う（VisibleはFalseのまま）
2. セルへの値の転記、書式設定、罫線引きなどを一気に行う
3. 最後にVisibleをTrueにしてユーザーに見せる
こうすることで、ユーザーは「一瞬で完成品が表示された」ように感じ、動作のストレスが軽減されます。
避けては通れない「解放」の儀式
オートメーションで最も多いトラブルが「プロセスが裏で残り続ける」現象です。タスクマネージャーを開くとExcelがいくつも起動している…そんな経験はありませんか？
これは、オブジェクトの解放が正しく行われていない証拠です。必ず以下の手順を踏んでください。
Set objExcel = Nothing を実行する前に、objExcel.Quit を呼び出す。
そして、エラーが発生しても確実に終了処理を通るよう、On Error Resume Next を組み合わせた「終了用ラベル」を用意するのが、ベテランの流儀です。
おわりに
AccessとExcelは、適材適所で使い分けることで最強の武器になります。Excelはあくまで「データの見せ場所」です。Accessで計算し、Excelには最小限の加工だけをさせる。この役割分担を意識するだけで、皆さんの業務効率は劇的に向上するはずです。
次回は、大量のExcelファイルを高速で処理するための「配列転送テクニック」について解説したいと思います。それでは、また現場でお会いしましょう。
