Reference Property
Returns a Range object that represents a footnote, endnote, or comment reference mark.
expression.Reference
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example sets myRange to the first footnote reference mark in the active document and then copies the reference mark.
Set myRange = ActiveDocument.Footnotes(1).Reference
myRange.CopyThis example formats the comment reference marks in the selection to be red.
For Each comm In Selection.Comments
comm.Reference.Font.ColorIndex = wdRed
Next comm