Footnotes Collection Object

Multiple objects Footnotes (Footnote)
Range

A collection of Footnote objects that represent all the footnotes in a selection, range, or document.

Using the Footnotes Collection

Use the Footnotes property to return the Footnotes collection. The following example changes all of the footnotes in the active document to endnotes.

ActiveDocument.Footnotes.SwapWithEndnotes

Use the Add method to add a footnote to the Footnotes collection. The following example adds a footnote immediately after the selection.

Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Footnotes.Add Range:=Selection.Range , _
    Text:="The Willow Tree, (Lone Creek Press, 1996)."

Use Footnotes(index), where index is the index number, to return a single Footnote object. The index number represents the position of the footnote in the selection, range, or document. The following example applies red formatting to the first footnote in the selection.

If Selection.Footnotes.Count >= 1 Then
    Selection.Footnotes(1).Reference.Font.ColorIndex = wdRed
End If

Remarks

Footnotes positioned at the end of a document or section are considered endnotes and are included in the Endnotes collection.