Word VBAの深淵：セクションという「迷宮」をLinkToPreviousで支配する
業務自動化において、Word VBAはしばしば「沼」と評される。Excel VBAのようにセルという絶対座標が存在せず、流動的な「Range」や「Story」という概念が支配するこの環境では、場当たり的なコードはすぐに崩壊する。
特に、ドキュメント生成ツールを開発する際、避けて通れないのが「セクションごとのヘッダー・フッター制御」だ。多くの初心者が「なぜか前のセクションのヘッダーまで変わってしまう」という呪いに悩まされる。
今回は、この制御の正体である `LinkToPrevious` プロパティを完全に掌握し、堅牢なドキュメント生成アーキテクチャを構築するための極意を伝授する。
—
1. なぜ「LinkToPrevious」は裏切るのか
Wordのヘッダー・フッターは、単なるテキストの集合体ではない。これらは`StoryRanges`という独立した階層に格納されている。
問題の本質は、Wordがデフォルトで「前のセクションのレイアウトを引き継ぐ」という設計思想に基づいている点にある。`LinkToPrevious = True` である限り、セクションを跨いだヘッダーは「同一のオブジェクト」を参照し続ける。これを理解せずに `Range.Text` を操作すれば、ドキュメント全体が汚染されるのは必然だ。
陥りがちなアンチパターン
‘ 絶対にやってはいけないコード
ActiveDocument.Sections(2).Headers(wdHeaderFooterPrimary).Range.Text = “新ヘッダー”
これでは、セクション1のヘッダーまで一瞬で書き換わる。なぜなら、リンクが生きている状態で片方を操作すれば、それは「共有リソースへの書き込み」と同義だからだ。
—
2. 堅牢な設計へのアプローチ：3つの鉄則
プロフェッショナルな自動化ツールを作るなら、以下のフローを徹底せよ。
1. リンクの切断を最優先する: `LinkToPrevious` を `False` にするまで、絶対にコンテンツの書き込みを行わない。
2. Rangeの明示: `Selection` オブジェクトには触れるな。あれはカーソルを動かす必要悪であり、パフォーマンスと安定性を著しく低下させる。
3. セクションとヘッダー種類の相関を意識する: 偶数ページ、奇数ページ、先頭ページの違いを考慮した `wdHeaderFooterPrimary` などの定数を正しく指定せよ。
—
3. 実践：プロダクションコード例
以下は、任意のセクションにおいてヘッダーを「完全独立」させ、安全に書き換えるためのモジュールだ。この関数は、エラーハンドリングを含め、大規模なドキュメント生成基盤にも組み込める設計にしている。
‘ @description 指定セクションのヘッダーを独立させ、テキストを更新する
‘ @param targetSection As Section
‘ @param headerText As String
Public Sub UpdateHeaderSafely(targetSection As Section, headerText As String)
Dim hdr As HeaderFooter
‘ セクション内のプライマリヘッダーを取得
Set hdr = targetSection.Headers(wdHeaderFooterPrimary)
‘ 重要：リンクを切断する前に、必ず存在するセクションか確認する
‘ リンクをFalseにするのは、コンテンツを書き換える直前に行うのが定石
If hdr.LinkToPrevious Then
hdr.LinkToPrevious = False
End If
‘ Rangeオブジェクトをクリアして再構築
‘ 直接Textプロパティを代入するのではなく、Rangeを活用することで
‘ 書式設定の崩れを防ぐ
With hdr.Range
.Text = headerText
.ParagraphFormat.Alignment = wdAlignParagraphRight
.Font.Name = “Meiryo UI”
.Font.Size = 9
End With
End Sub
—
4. 開発現場で勝つための「高度な知見」
ファイルやデータベースとの連携
Wordのヘッダー更新を伴う自動化では、往々にして外部（SQL ServerやJSON/CSV）からデータを流し込むケースが多い。このとき、「ヘッダー更新のたびにドキュメント全体を再描画させない」ことがパフォーマンス維持の鍵となる。
- ScreenUpdatingの制御: `Application.ScreenUpdating = False` は必須だが、さらに `Application.PrintPreview` を一時的に挟むことで、Wordの内部エンジンを強制的に再計算させ、レイアウト崩れを未然に防ぐテクニックもある。
- イベントの無効化: データベース連携時にドキュメントを連続生成する場合、`Application.EnableEvents = False` にし、不要なイベント発火によるメモリリークを防げ。
保守性を高めるアーキテクチャ
業務ツールは「作って終わり」ではない。後任者がヘッダーの仕様変更を求められたとき、このコードは一目瞭然である必要がある。ヘッダーの設定ロジックを独立した `Helper` モジュールに切り出し、`UpdateHeaderSafely` のような名前でカプセル化しておくこと。
—
最後に：エンジニアとしての矜持
Word VBAは「泥臭い」仕事かもしれない。しかし、Wordという巨大なオブジェクトモデルを制御し、人間の手作業を一切排除する自動化システムには、他にはない美学がある。
「リンクを切る」というたった一行のコードが、ドキュメントの整合性を守る壁となる。その重みを理解してコードを書く者だけが、真の業務効率化という果実を手にできるのだ。
さあ、迷わずセクションを制御し、完璧なドキュメントを生成せよ。君のコードは、その現場の標準になるはずだ。
