図や表などへの複数の相互参照を含む大きな Word 文書があります。
これらの参照にページ番号を追加するにはどうすればよいですか?
たとえば、「表 2 を参照してください」は「表 2 (p. 123) を参照してください」になります。
これは可能ですか? マクロまたは VB スクリプトを使用すれば可能でしょうか?
答え1
ラベルと番号(例:表)の両方を含む単一の統合された相互参照を作成する方法を知りません。ん、 形ん、または方程式ん) とページ番号も必要ですが、同じ項目/キャプションへの 2 つの別々の相互参照を使用してこれを行うこともできます。
私は5分かけてマクロを録画し、「フィギュアん” 参照して追加 “ (ページ番号)”:
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Copy
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.TypeText Text:=" (page "
Selection.PasteAndFormat (wdFormatOriginalFormatting)
Selection.TypeText Text:=")"
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
ActiveWindow.View.ShowFieldCodes = Not ActiveWindow.View.ShowFieldCodes
Selection.MoveLeft Unit:=wdCharacter, Count:=4
Selection.MoveRight Unit:=wdCharacter, Count:=8
Selection.MoveLeft Unit:=wdCharacter, Count:=3
Selection.TypeText Text:="PAGE"
ActiveWindow.View.ShowFieldCodes = Not ActiveWindow.View.ShowFieldCodes
Selection.Fields.Update
「図」を挿入するだけですん” 相互参照して上記を実行します。
- 作成した参照をコピーし、
- 「
(page
」を挿入します。 - 相互参照を貼り付け、
- 「
)
」を挿入します。 - 戻って(左に)相互参照を選択し、
- 相互参照を編集して、
REF
に変更しますPAGEREF
。
これは、表や数式でも同様に機能し、(おそらくいくつかの変更を加えて) セクションの見出しでも同様に機能すると思います。