【Word VBA極意】「なぜか直らない書式」を叩き斬る！段落の内部構造を解析・修復する禁断のテクニック
こんにちは。現場で「Wordが言うことを聞かない」「謎の書式崩れが止まらない」という絶望と戦うエンジニアたちへ。
マクロの記録で生成されたコードを並べるだけの段階は、もう卒業しましょう。Wordの文書は、実は「複雑なXMLの海」の上に成り立っています。表面上のプロパティ（`.Font.Name`など）をいじるだけでは届かない、さらに深い層で発生している「書式の腐敗」をどう修復するか。
今日は、Word VBAの深淵――「オブジェクトのライフサイクル」と「内部プロパティの再定義」という、一段上の視座を伝授します。
—
1. なぜ「書式が直らない」という怪奇現象が起きるのか？
Wordの段落（Paragraph）には、「直接書式（Direct Formatting）」と「スタイル（Style）」という二重構造があります。
ユーザーが「フォントをメイリオにしたい」と操作した時、内部では「スタイルの定義」を上書きするのか、それとも「その段落にだけ強引なフラグを立てるのか」が混在します。これが繰り返されると、Wordの内部管理テーブル（`Format-Run`）が断片化し、見た目と実体が乖離する「書式破損」が発生するのです。
`Selection.Font.Name = “…”` と書くだけでは、この破損したフラグは消えません。一度、強制的に書式を「初期化」し、再適用するプロセスが必要です。
—
2. 禁断の修復術：書式の「強制リセット」と「再構築」
ただ上書きするのではなく、一度「スタイル以外の直接書式」を全消去し、正しいプロパティを再投入する。これが最も安全で、かつ確実な修復法です。
以下のコードは、選択範囲の段落に対し、内部破損を取り除くための「外科手術」を行うプロシージャです。
‘ 【究極の修復術】選択された段落の直接書式を浄化し、再定義する
Sub RepairParagraphFormatting()
Dim para As Paragraph
‘ 画面更新を停止（高速化とチラつき防止の定石）
Application.ScreenUpdating = False
For Each para In Selection.Paragraphs
‘ 1. 直接書式を一度クリア（Word内部の破損したRunを掃除）
‘ RangeオブジェクトのClearFormattingは、スタイル以外の直接的な書式をリセットします
para.Range.Font.Reset
para.Range.ParagraphFormat.Reset
‘ 2. ここで「本来あるべき正解の書式」を再定義する
With para.Range.Font
.Name = “游ゴシック”
.Size = 10.5
.Color = wdColorBlack
End With
‘ 3. 段落インデント等の再設定
With para.Range.ParagraphFormat
.LineSpacingRule = wdLineSpaceSingle
.CharacterUnitFirstLineIndent = 1
End With
Next para
Application.ScreenUpdating = True
MsgBox “破損した書式の修復が完了しました。”
End Sub
コードの重要ポイント：
- `.Reset` メソッド: これが今回の主役です。これは「手動で上書きされたフォント情報」という、内部で腐敗しやすい情報を一度「デフォルト（スタイル定義）」に戻す強力なメソッドです。
- `Application.ScreenUpdating`: これをオフにしないと、何千行もの文書を処理する際にWordがフリーズしたように見えます。プロの作法として必ず入れましょう。
—
3. 初学者が陥りやすい「オブジェクトの罠」
VBAを書き始めた方がよくやるミスが、「RangeオブジェクトとSelectionオブジェクトの混同」です。
- Selectionは「ユーザーの視線」: マウスで選択している場所を指します。非常に脆く、処理のたびに描画コストがかかります。
- Rangeは「文書の真実」: 文書内の特定範囲を物理的に指し示します。
今回の修復術では、`Selection`ではなく`Paragraph`（Rangeの一部）を直接叩いています。これにより、ユーザーがカーソルを動かしていても、処理はバックグラウンドで正確に行われます。これが「マクロの記録」からの脱却、すなわち「エンジニアとしての成長」の一歩です。
—
4. さあ、次のステージへ
ここをクリアしたあなたは、もう「動けばいいコード」を書くレベルではありません。「Wordというシステムがどう情報を持ち、どう破綻し、どう再構築されるか」というアーキテクチャの視点を持てています。
もし、これでも直らない強固な破損がある場合は、`XMLの直接操作（OpenXML SDK）`という禁断の領域へ踏み込むことになりますが……それはまた別の機会に。
まずはこの「Resetによる再構築」を武器に、現場の文書を美しく磨き上げてください。プログラミングは、単なる自動化の道具ではなく、システムの理（ことわり）を支配する力なのです。
質問があれば、いつでもどうぞ。あなたのコーディングライフを応援しています。
