Reference Property 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.Copy

This 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