MS Word - добавить номер страницы к нескольким перекрестным ссылкам

Question

У меня большой документ с несколькими перекрестными ссылками на рисунки, таблицы и т.д.

Как я могу добавить номер страницы к этим ссылкам?

Так, например, «См. Таблицу 2» станет «См. Таблицу 2 (стр. 123)».

Это возможно? Возможно, с помощью макроса или скрипта VB?

Answer 1

Я не знаю ни одного способа сделать единую, унифицированную перекрестную ссылку, которая бы включала бы метку и номер (например, Таблица n, Рисунок n или Уравнение n), а также номер страницы - но вы, безусловно, можете сделать это с двумя отдельными перекрестные ссылки на один и тот же элемент / подпись:

       

Я потратил пять минут на запись макроса, чтобы взять ссылку «Figure n » и добавить «(page num)»:

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

Просто вставьте перекрестную ссылку «Рисунок n » и выполните приведенное выше.  Это

• копирует ссылку, которую вы только что создали,
• вставляет «  (page  »,
• вставляет перекрестную ссылку,
• вставляет « ) »,
• перемещается назад (влево) и выбирает перекрестную ссылку, и
• редактирует перекрестную ссылку, изменяя REF на PAGEREF .

Я ожидаю, что это будет работать одинаково с таблицами и уравнениями, и (возможно, с некоторыми изменениями) с заголовками разделов.