Range.InsertCrossReference (Word)

Inserts a cross-reference to a heading, bookmark, footnote, or endnote, or to an item for which a caption label is defined (for example, an equation, figure, or table).

If you specify wdPageNumber for the value of ReferenceKind, you may need to repaginate the document to see the correct cross-reference information.

InsertCrossReference (ReferenceType, ReferenceKind, ReferenceItem, InsertAsHyperlink, IncludePosition, SeparateNumbers, SeparatorString)

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
myBookmarks = ActiveDocument _ 
 .GetCrossReferenceItems(wdRefTypeBookmark) 
With myRange 
 .InsertBefore "Page " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeBookmark, _ 
 ReferenceKind:=wdPageNumber, ReferenceItem:=myBookmarks(1) 
End With

Arguments

The following arguments are required:

ReferenceType (WdCaptionLabelID) - The type of item for which a cross-reference is to be inserted. Can be any WdReferenceType or WdCaptionLabelID constant or a user defined caption label.

Possible return values are wdCaptionEquation - Equation, wdCaptionFigure - Figure, wdCaptionTable - Table.

ReferenceKind (WdReferenceKind) - The information to be included in the cross-reference.

Here you can find possible values for WdReferenceKind

ReferenceItem (Long) - If ReferenceType is wdRefTypeBookmark, this argument specifies a bookmark name. For all other ReferenceType values, this argument specifies the item number or name in the Reference type option in the Cross-reference dialog box. Use the GetCrossReferenceItems method to return a list of item names that can be used with this argument.

Optional arguments

The following arguments are optional

InsertAsHyperlink (Boolean) - True to insert the cross-reference as a hyperlink to the referenced item.

IncludePosition (Boolean) - True to insert "above" or "below," depending on the location of the reference item in relation to the cross-reference.

SeparateNumbers (WdReferenceKind) - True to use a separator to separate the numbers from the associated text. (Use only if the ReferenceType parameter is set to wdRefTypeNumberedItem and the ReferenceKind parameter is set to wdNumberFullContext.).

Here you can find possible values for WdReferenceKind

SeparatorString (String) - Specifies the string to use as a separator if the SeparateNumbers parameter is set to True.