【Word VBA】Undoスタックを支配せよ：UndoRecordオブジェクトによるトランザクション設計の極意
Word VBAでドキュメントを操作する際、多くのエンジニアが陥る罠がある。`Paragraph.Range.Font`をループで叩き続けるような書式設定だ。1,000段落あれば、ユーザーが「元に戻す（Ctrl+Z）」を押したとき、Wordは1,000回分のUndo操作を要求される。結果として、ユーザーは「Ctrl+Z」を連打する羽目になり、あるいはWordが応答なしに陥る。
これはプロの仕事ではない。UndoRecordオブジェクトを使い、一連の処理を「単一のトランザクション」としてスタックに刻み込む技術こそ、モダンな自動化の必須要件だ。
—
UndoRecordの概念：メモリ上の「不可分な一塊」
WordのUndoスタックは、アプリケーションレベルで管理されるLIFO（後入れ先出し）構造のメモリ領域だ。通常、VBAの単一ステートメントは個別のUndo単位として扱われるが、`UndoRecord`クラスを用いることで、物理的に複数の操作を論理的な「一つの操作」としてカプセル化できる。
実装の黄金律
1. 開始（StartCustomRecord）: トランザクションの起点。
2. 実行: 膨大なRange操作。
3. 終了（EndCustomRecord）: 確定。
これらを確実にスコープ内で実行し、例外発生時（エラーハンドリング）にスタックを汚染させないことが、シニアエンジニアの最低条件である。
—
実装コード：トランザクション管理のテンプレート
以下は、数千の段落にまたがる装飾を「たった1回のCtrl+Z」で巻き戻せるようにする、堅牢な実装パターンである。
‘ @description: Undoスタックを制御するトランザクションラッパー
Public Sub ApplyProfessionalFormatting()
Dim undoRec As UndoRecord
Set undoRec = Application.UndoRecord
‘ トランザクション開始：ラベルは[元に戻す]メニューに表示される名前
undoRec.StartCustomRecord “一括書式適用_VBA_Transaction”
On Error GoTo Cleanup
‘ 処理の本体：Rangeオブジェクトはメモリ効率のため都度再利用せず最小化する
Dim para As Paragraph
For Each para In ActiveDocument.Paragraphs
‘ パフォーマンスの極致：Rangeを直接操作し、Objectの過剰生成を避ける
With para.Range
.Font.Name = “游明朝”
.Font.Size = 10.5
.ParagraphFormat.LineSpacingRule = wdLineSpace1_5
End With
Next para
Cleanup:
‘ 正常系/異常系を問わず必ず閉じる（さもなくばスタックが壊れる）
undoRec.EndCustomRecord
If Err.Number <> 0 Then
MsgBox “予期せぬエラー発生：” & Err.Description, vbCritical
End If
End Sub
—
シニアエンジニアが知るべき「裏側の真実」
1. オブジェクトの明示的解放とメモリの断片化
VBAにはガベージコレクタが存在するが、WordのCOMオートメーションは「参照カウント」に依存している。`Range`や`Selection`をループ内で不用意に生成し続けると、メモリの断片化を招き、大規模文書でWordが重くなる。
- 対策: `Set`したオブジェクトは、可能な限りループの外で定義し、ループ内ではプロパティのみを操作する。不要になった巨大なRangeオブジェクトは、`Set obj = Nothing`で参照を切り、スタックの肥大化を抑える。
2. Windows APIによる監視の限界
もしWordが「応答なし」になった場合、Windows APIの`SendMessage`等で`WM_UNDO`を送るような荒業もあるが、これは「Wordの内部状態」を無視した破壊的行為だ。Wordが持つ`UndoRecord`という本来のAPIを使いこなすことが、保守性を担保する唯一の正攻法である。
3. システム間連携における注意点
外部のデータベースやAPIからWordへデータを流し込む際、この`UndoRecord`を適切に配置しないと、データ挿入と書式設定がバラバラの履歴として残り、UXが著しく低下する。「1つのデータインポート操作＝1つのUndo単位」という原則をコードに刻み込め。
—
結論：プロフェッショナルであるということ
Word VBAはレガシーではない。Wordという巨大なドキュメントエンジンを制御するための、強力なインターフェースだ。
Undoスタックを制する者は、ユーザーのUXを制する。大規模な自動化を組む際、単に「動くコード」を書くのではなく、そのコードがユーザーのワークフロー（Undo操作を含む）にどう影響を与えるかまで設計せよ。それこそが、伝説を支えるアーキテクトの矜持である。
質問があれば、コードの深淵で待っている。
