Word VBAを掌握する：運任せのコードから「堅牢なシステム」への脱却
こんにちは。Word VBAの世界へようこそ。
マクロの記録ボタンを押してコードを生成し、「なぜか動かない」「どこで止まったか分からない」と頭を抱えた経験はありませんか？ それは、あなたが悪いのではなく、「エラーという名の予期せぬ来客」に対する備えがコードに足りていないだけなのです。
今日は、ただ動くだけのスクリプトを卒業し、プロの現場でも通用する「自己診断可能なコード」へと進化させるための、エラーハンドリングの極意を伝授します。
—
1. なぜ「エラー処理」が必要なのか？
Wordのオブジェクトモデル（`Application` → `Document` → `Range`…）は非常に強力ですが、同時に繊細です。
- 「開こうとしたファイルが存在しない」
- 「保護された文書に対して編集を試みた」
- 「選択範囲が想定外の箇所にある」
これらは開発中のミスの他に、ユーザーの操作次第で必ず発生します。エラー処理がないコードは、「転んだ瞬間に記憶を失う」ようなものです。どこで、なぜ倒れたのかを記録に残すことこそ、保守性の高いコードへの第一歩です。
—
2. 実践：エラーを自動記録する「究極の雛形」
以下のコードは、エラーが発生した瞬間に、その状況をテキストファイルに書き出すための共通ハンドラです。これをあなたのモジュールに忍ばせておくだけで、デバッグの質が劇的に変わります。
‘ ———————————————————
‘ エラーログを書き出すための共通プロシージャ
‘ ———————————————————
Public Sub WriteErrorLog(ByVal ErrNumber As Long, ByVal ErrDescription As String, ByVal ProcName As String)
Dim logPath As String
Dim fileNo As Integer
‘ ログファイルの保存先（Wordファイルと同じフォルダ）
logPath = ThisDocument.Path & “\error_log.txt”
fileNo = FreeFile
‘ 追記モード(Append)でファイルを開く
Open logPath For Append As #fileNo
‘ 時刻、発生場所、エラー内容を記録
Print #fileNo, “————————————————–”
Print #fileNo, “発生日時: ” & Now
Print #fileNo, “発生場所: ” & ProcName
Print #fileNo, “エラーNo: ” & ErrNumber
Print #fileNo, “内容: ” & ErrDescription
Close #fileNo
End Sub
‘ ———————————————————
‘ 実際の業務マクロ（呼び出し例）
‘ ———————————————————
Public Sub MainProcess()
‘ エラーが発生したら「ErrorHandler」ラベルへ飛ぶ
On Error GoTo ErrorHandler
‘ ここにメイン処理を記述
‘ 例：存在しないファイルを操作しようとしてみる
Documents.Open “C:\non_existent_file.docx”
Exit Sub
ErrorHandler:
‘ エラー情報をログに書き出す
Call WriteErrorLog(Err.Number, Err.Description, “MainProcess”)
‘ ユーザーにも最低限の通知を行う
MsgBox “予期せぬエラーが発生しました。詳細は error_log.txt を確認してください。”, vbCritical
End Sub
—
3. コードの心臓部を解読する
このコードがなぜ「プロ仕様」なのか、重要なポイントを解説します。
① `On Error GoTo ErrorHandler`
これがVBAの「守護神」です。この行を処理の頭に置くことで、エラー発生時に強制終了せず、指定したラベル（`ErrorHandler:`）へ処理を逃がすことができます。
② `Err` オブジェクトの魔法
`Err`は、エラーが発生した瞬間にWordが自動生成する特別なオブジェクトです。
- `Err.Number`：エラー番号（「ファイルが見つかりません」などの識別子）
- `Err.Description`：エラーの詳細メッセージ
これらを取得することで、「何が起きたか」を完璧に特定できます。
③ `FreeFile` の重要性
`Open`文でファイルを開く際、適当な番号（`#1`など）を振るのは危険です。他のプログラムがその番号を使っているかもしれないからです。`FreeFile`は、システム上で空いている番号を自動で見つけてくれる賢い関数です。
—
4. 成長のためのアドバイス：さらに上を目指すあなたへ
エラーハンドリングをマスターすると、次に意識すべきは「オブジェクトの解放」です。
Word VBAでは、`Set doc = Documents.Open(…)`のようにオブジェクトを生成した際、処理の最後で必ず `Set doc = Nothing` と記述する癖をつけてください。これを怠ると、Wordのメモリ上に幽霊のようなオブジェクトが残り、動作が重くなったり、意図しないエラーを誘発したりします。
「使ったものは、責任を持って片付ける」
これが、Word VBAを制御する者の矜持です。
—
まとめ：ここをクリアすれば大丈夫！
1. エラーハンドラは全プロシージャに入れる：面倒がらず、雛形としてコピペしましょう。
2. ログを味方につける：エラーは「失敗」ではなく「改善のヒント」です。
3. オブジェクトのライフサイクルを意識する：作成したものは必ず後始末を。
エラーハンドリングを実装することは、自分自身の未来の時間を守ることです。さあ、あなたのコードに「ログを吐く能力」を与えて、ワンランク上のエンジニアへと羽ばたいてください！
何か分からないことがあれば、いつでも質問してくださいね。一緒に最強のマクロを育てていきましょう。
