☰

MS Word - adicione número de página a múltiplas referências cruzadas

tag-icon • tag-icon microsoft-word
MS Word - adicione número de página a múltiplas referências cruzadas

Eu tenho um grande documento do Word com várias referências cruzadas para figuras, tabelas, etc.

Como posso adicionar um número de página a essas referências?

Assim, por exemplo, "Ver Tabela 2" se tornaria "Ver Tabela 2 (p. 123)".

Isso é possível? Talvez com um script Macro ou VB?

Responder1

Não conheço nenhuma maneira de fazer uma referência cruzada única e unificada que inclua um rótulo e um número (por exemplo, Tabelan, Figuran, ou Equaçãon) e também um número de página — mas você certamente pode fazer isso com duas referências cruzadas separadas para o mesmo item/legenda:

       

Passei cinco minutos gravando uma macro para tirar uma “Figuran”referenciar e adicionar“ (páginanúmero)”:

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

Basta inserir sua “Figuran”Referência cruzada e execute o acima. Isto

  • copia a referência que você acabou de criar,
  • insere “  (page ”,
  • cola a referência cruzada,
  • insere “ )”,
  • move para trás (para a esquerda) e seleciona a referência cruzada, e
  • edita a referência cruzada, mudando REFpara PAGEREF.

Espero que isso funcione igualmente com tabelas e equações e (possivelmente com algumas modificações) com títulos de seção.

informação relacionada