Word VBAの「置換」で書式が崩れる諸君へ：プロが教える「置換の作法」
Wordの自動化において、`Find.Execute Replace:=wdReplaceAll` は強力だ。だが、多くの初心者がこの「魔法の杖」を振った瞬間、悲鳴を上げる。
「置換したら、せっかく設定したフォントやスタイルが全部消えて、標準スタイルに戻っちまった！」
これはWord VBAの仕様を理解していない者が陥る、典型的な地雷だ。なぜそうなるのか。そして、プロはどうやって「文字列だけを外科手術のように入れ替える」のか。その極意を伝授しよう。
—
なぜ「置換」で書式が消えるのか？
Wordの`Find`オブジェクトは、デフォルトでは「テキストの検索」と「書式の保持」を別個のものとして扱う。`Replacement.Text`に文字列を放り込む際、もし`Replacement.Font`プロパティが明示的にクリア（あるいは未設定）であれば、Wordは対象テキストに対して「書式の強制リセット」を内部的に走らせる仕様になっている。
つまり、「何も指定しない」ことは「書式を破壊する」という命令と同義なのだ。
—
極限の解決策： `Find` オブジェクトの「クリーン・プロパティ」
書式を維持するための鉄則は、検索対象の書式（`Find.Font`）と置換後の書式（`Replacement.Font`）を明示的に「クリア」することだ。これを怠ると、前回の置換の残滓がゴミとして残り、予期せぬバグを引き起こす。
以下のコードは、現役の開発現場で私がテンプレートとして使用している「書式維持・置換エンジン」だ。
実務用プロダクションコード：SafeReplace
Public Sub SafeReplace(ByVal targetRange As Range, _
ByVal findText As String, _
ByVal replaceText As String)
‘ 検索・置換オブジェクトの取得
Dim fnd As Find
Set fnd = targetRange.Find
‘ 1. 前回の設定が残っているとバグの温床になるため、必ずクリアする
fnd.ClearFormatting
fnd.Replacement.ClearFormatting
‘ 2. 検索条件の設定
With fnd
.Text = findText
.Replacement.Text = replaceText
‘ 3. ここが重要：書式を維持させるための設定
‘ 明示的に「書式を置き換えない（維持する）」と指示する
.Replacement.Font.Reset
.Forward = True
.Wrap = wdFindContinue
.Format = False ‘ 書式による検索を無効化
.MatchCase = False
.MatchWholeWord = False
‘ 4. 置換の実行
.Execute Replace:=wdReplaceAll
End With
End Sub
—
プロが語る設計の注意点
1. `ClearFormatting` の重要性
コード内で `fnd.ClearFormatting` を呼び出しているのは、単なるお作法ではない。Wordの検索エンジンはセッションを跨いで設定を保持する性質がある。前回の置換で「赤文字のみを置換」という条件を使っていた場合、このクリアを忘れると、次回の置換がすべて失敗する。「使う前は常にクリア」。これが堅牢な自動化の第一歩だ。
2. ファイル・データベース連携時のリスク
もし外部のCSVやDBから読み込んだ文字列を置換する場合、「制御文字（改行コードなど）」の混入に細心の注意を払え。Word VBAでは `^p` (段落記号) や `^t` (タブ) が検索対象になる。これらが意図せず置換文字列に含まれると、文書構造が崩壊する。入力値のサニタイズ（不要な改行の除去など）を置換前に行うロジックを必ず挟むこと。
3. パフォーマンスの真実
数千ページのドキュメントで `ReplaceAll` を繰り返すとWordは重くなる。もし大量の置換を行いたいなら、`Range`オブジェクトを絞り込み、必要最小限の範囲で実行せよ。`ActiveDocument.Content.Find` は、巨大な文書ではメモリ負荷が高い。
—
結論：自動化は「丁寧な設計」から始まる
初心者は「動けばいい」と考えてコードを書くが、プロは「どうすれば壊れないか」を考えてコードを書く。`ClearFormatting` を徹底し、書式の継承を制御する。たったこれだけの違いで、君のツールは「不安定なおもちゃ」から「信頼できる業務システム」へと昇華する。
Word VBAを掌握したいのであれば、Wordという複雑なオブジェクトモデルの「影」を読み解く努力を惜しむな。質問があればいつでも受け付ける。次は、正規表現を用いた高度な文字列操作について語るとしよう。健闘を祈る。
