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

Tasmd3vil · #6 01-07-2022, 08:02 AM

Quote:

Originally Posted by macropod

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.

Hi,

I'm highly interested in the code given by macropod. My only problem is, I would like to combine the header text together with it's header number instead of the page, like in this macro given. Does somebody have an idea?

Thanks in advance

,
Kay

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

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