Word VBAを掌握する：動的帳票の「ブックマーク」を制して、崩れないドキュメントを作る極意
こんにちは。Word VBAの世界へようこそ。
「マクロの記録」でコードを生成し、いざ実行してみたら「実行時エラーが発生しました」と冷たく突き放された経験はありませんか？
Wordのドキュメント作成自動化において、最も頻繁に直面する壁。それが「ブックマーク（Bookmark）」の扱いです。今回は、Word VBAの心臓部であるオブジェクトモデルを理解し、レイアウトを壊さずにデータを流し込む「プロの定石」を伝授します。
—
1. なぜ「ブックマーク」で躓くのか？
Wordのブックマークは、ドキュメント内の「位置」を指し示す目印です。しかし、初心者が陥りがちなのが「ブックマークの削除」という罠。
ユーザーがドキュメントを編集している最中に、うっかりブックマークを含めて文字列を削除してしまうと、プログラム側は「指し示す場所がない！」とパニックを起こし、エラーを吐きます。
私たちが目指すべきは、「ブックマークがあれば書き込み、なければ安全にスルーする（あるいは警告を出す）」という、防御的で知的なコードです。
—
2. オブジェクトモデルの「階層」を意識する
WordのVBAを操るには、この階層構造をイメージしてください。
- Application（Wordそのもの）
- Document（開いている帳票）
- Bookmarks（ブックマークのコレクション）
- Bookmark（個別の目印）
- Range（文字を埋め込むための「範囲」）
この中で最も重要なのがRangeオブジェクトです。Rangeは「点」ではなく「領域」を指します。ここにデータを流し込むことが、レイアウトを崩さない秘訣です。
—
3. 実践：安全にデータを流し込む「堅牢なテンプレート」
以下は、私が現場で実際に採用している、エラーを回避しつつデータを流し込む実装パターンです。
Sub FillBookmarkSafely(ByVal bookmarkName As String, ByVal textValue As String)
Dim doc As Document
Dim rng As Range
Set doc = ActiveDocument
‘ 1. ブックマークの存在チェック
‘ 存在しない場合にエラーで止まるのを防ぐ
If doc.Bookmarks.Exists(bookmarkName) Then
‘ 2. ブックマークの範囲を取得
Set rng = doc.Bookmarks(bookmarkName).Range
‘ 3. データを代入
rng.Text = textValue
‘ 4. 重要：ブックマークを再作成する
‘ テキストを置換するとブックマーク自体が消滅するため、再定義する
doc.Bookmarks.Add Name:=bookmarkName, Range:=rng
Else
‘ 開発者向けにログを残す（または無視する）
Debug.Print “警告: ブックマーク ‘” & bookmarkName & “‘ が見つかりませんでした。”
End If
End Sub
このコードの「プロのこだわり」
- `.Exists` で事前ガード: 存在するか確認せずにアクセスするのは、目隠しで崖を歩くようなもの。まずは確認が鉄則です。
- `.Range` を定義して操作: `Selection` オブジェクトを使ってはいけません。`Selection` は画面のカーソル位置に依存するため、実行中にユーザーがどこかをクリックすると即座にレイアウトが崩壊します。`Range` は背後で静かに処理を完結させるためのプロの道具です。
- ブックマークの再作成: `rng.Text = “値”` とすると、Wordは「範囲」を上書きし、その結果ブックマークという「目印」自体を消し去ってしまいます。`doc.Bookmarks.Add` で再度その範囲を括り直すことで、二回目以降の転記も可能にするのが「極限の設計」です。
—
4. 運用上のヒント：レイアウト崩れを防ぐために
コードが完璧でも、Wordの仕様でレイアウトが崩れることがあります。それを防ぐためのアドバイスを二つ。
1. 「テーブル（表）」の中への流し込み:
もしブックマークが表のセル内にあるなら、`rng.Text` を代入した後にセル幅が自動調整されて崩れることがあります。`Table.AutoFitBehavior wdAutoFitFixed` を使って、あらかじめ列幅を固定しておくのがエンジニアの作法です。
2. テンプレートは必ず保護する:
自動化対象のWordファイルは「テンプレート（.dotm）」として保存し、運用時はそこから新規ドキュメントを作成するようにしましょう。元のファイルを直接編集させないことが、事故を未然に防ぐ最強の対策です。
—
最後に：ここをクリアすれば、あなたはもう脱・初心者
ブックマークの存在チェックと、Rangeオブジェクトによる静的な代入。この二つを身につければ、Word VBAで「壊れるマクロ」を作ることはなくなります。
「マクロの記録」が書き出す無駄なコードを整理し、自分だけの美しいライブラリを作ってみてください。そうして積み上げた知見こそが、あなたのエンジニアとしての強力な武器になります。
何か分からないことがあれば、いつでも聞いてくださいね。あなたの帳票自動化が成功することを心から応援しています。
