Define custom Cross-reference output format to include "static" text and pg numbers

macropod · #3 02-08-2016, 05:31 PM

You could use a macro like:

Code:

Sub InsertXrefWithPage()
Dim StrNm As String
Dialogs(wdDialogInsertCrossReference).Display
With Selection
  .Start = .Start - 1
  If .Fields.Count = 0 Then Exit Sub
  StrNm = "PAGE" & Trim(.Fields(1).Code.Text)
  .InsertAfter " on page "
  .Collapse wdCollapseEnd
  .Fields.Add Range:=.Range, Type:=wdFieldEmpty, Text:=StrNm, PreserveFormatting:=False
End With
End Sub

and assign it to a shortcut key and/or add it to the QAT. The macro will add ' on page ' plus the page # when you exit the Insert_Cross_Reference dialog.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Add static text to cross-reference	tfa91	Word	7	10-09-2019 07:15 AM
Making cross-reference say "Fig." instead of "Figure"	dgalb	Word	17	11-09-2014 06:25 AM
Reference number and cross reference for equation numbers to match the thesis format	wmac	Word	1	05-14-2013 08:54 PM
Cross Reference Heading Number with the word "Section" included	bblouin	Word	5	12-20-2012 05:27 PM
Is there a way to make the cross-refernce format to be "Only lable and number"?	Jamal NUMAN	Word	1	04-10-2011 03:31 PM