【Word VBA】フィールドコードを破壊するな！検索・置換の「安全地帯」を見極めるプロの知見
こんにちは。自動化の現場で数々のWordファイルを修復してきたチーフアーキテクトです。
Word VBAを触り始めると、誰もが一度は通る道……それが「検索と置換」です。しかし、マクロの記録で生成された `Selection.Find` をそのまま使っていませんか？
もし、その文書に「目次」や「差し込み印刷のデータ」が含まれていたら――。
あなたのマクロは、文書の心臓部である「フィールドコード」まで無差別に書き換え、文書を壊滅的な状態に追い込む「時限爆弾」になりかねません。
今日は、プロが現場で必ず行っている「フィールドコードを回避する検索ロジック」について、本質から解説します。これをマスターすれば、あなたのマクロは「破壊屋」から「頼れる相棒」へと進化します。
—
なぜフィールドコードは「検索対象」になるのか？
Wordの検索機能は、画面上に表示されている文字だけを見ているわけではありません。実は、裏側にある「フィールドコード（制御用文字列）」まで含めて検索しています。
例えば、 `{ TOC \o “1-3” }` という目次の裏側には、人間には見えない制御文字が潜んでいます。ここにあなたの「置換マクロ」が触れてしまった瞬間、Wordは「目次が壊れた」と判断し、文書を再構築できなくなります。
これを防ぐための鉄則はただ一つ。
「検索範囲（Range）を特定し、そのRangeがフィールド内に含まれていないか検証する」ことです。
—
プロのロジック：検索対象を「検証」してから置換する
単純に `Replace` を実行するのではなく、「見つかった場所がフィールドコード内ならスキップする」というフィルターを挟みます。
以下のコードを、あなたのツールボックスに加えてください。
Sub SafeReplaceWithFieldCheck()
Dim rng As Range
Set rng = ActiveDocument.Content
With rng.Find
.ClearFormatting
.Text = “検索したい文字列”
.Replacement.Text = “置換後の文字列”
.Forward = True
.Wrap = wdFindStop
‘ 検索を開始
Do While .Execute
‘ 見つかった場所（rng）がフィールド内にあるか判定
If rng.Fields.Count = 0 Then
‘ フィールド外なら置換を実行
rng.Text = .Replacement.Text
‘ 置換した分、Rangeを再設定して無限ループを防ぐ
rng.Collapse Direction:=wdCollapseEnd
Else
‘ フィールド内の場合は無視して次へ進む
rng.Collapse Direction:=wdCollapseEnd
End If
Loop
End With
MsgBox “置換が完了しました。フィールドコードは安全です。”
End Sub
—
コードの解説：ここが「プロのこだわり」
このコードには、マクロの記録にはない、現場で生き残るための3つの工夫があります。
1. `rng.Fields.Count = 0` での判定
見つかった場所（Range）に対して、Wordが「この範囲にはフィールドが含まれているか？」を問いかけています。カウントが0であれば、そこは純粋なテキストであるという確証が得られます。
2. `rng.Collapse` によるカーソル移動
検索で見つかった箇所をそのまま置換すると、Rangeが「置換後の文字列」全体に広がってしまい、無限ループや予期せぬ挙動を招きます。`Collapse` で「見つかった場所の直後」にカーソルを移動させることが、安定動作の要です。
3. `wdFindStop` の活用
`wdFindContinue` にしてしまうと、文書の末尾から先頭へ戻ってしまい、エンドレスな置換が発生します。プロは常に「範囲」を明確に制御します。
—
陥りやすいエラーと回避策
- 「マクロが途中で止まる」:
フィールドコードの中には、`wdFieldFormCheckBox` のような特殊なオブジェクトが含まれることがあります。もし複雑な文書を扱う場合は、`On Error Resume Next` を適切に配置し、エラー発生時に「ログ」を吐き出す仕組みを構築してください。
- 「すべて置換（ReplaceAll）を使いたい」:
確かに速いですが、フィールドコードを回避する「すべて置換」はVBA単体では不可能です。「速度を取るか、安全を取るか」。重要な文書であればあるほど、ループ処理による安全な置換を選択してください。
—
最後に：自動化の先にあるもの
Word VBAを扱うということは、単にコードを書くことではなく、「Wordという複雑な巨大オブジェクトモデルと対話すること」です。
今回紹介した「フィールドコードを避ける」という視点は、どんな自動化にも応用できる「防御的プログラミング」の第一歩です。ここをクリアすれば、あなたはもう初学者ではありません。
「ツールが動く」だけでなく、「文書を壊さない」こと。この意識こそが、あなたを真の業務自動化エンジニアへと押し上げます。ぜひ、今の業務の検索マクロを、この「安全なコード」に書き換えてみてください。
また何か壁にぶつかったら、いつでもここへ戻ってきてくださいね。応援しています！
