Endnotes Collection Object (Word)
A collection of Endnote objects that represents all the endnotes in a selection, range, or document.
Remarks
Use the Endnotes property to return the Endnotes collection. The following example sets the location of endnotes in the active document.
ActiveDocument.Endnotes.Location = wdEndOfSection
Use the Add method to add an endnote to the Endnotes collection. The following example adds an endnote immediately after the selection.
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Endnotes.Add Range:=Selection.Range , _
Text:="The Willow Tree, (Lone Creek Press, 1996)."
Use Endnotes(Index), where Index is the index number, to return a single Endnote object. The index number represents the position of the endnote in a selection, range, or document. The following example applies red formatting to the first endnote in the selection.
If Selection.Endnotes.Count >= 1 Then
Selection.Endnotes(1).Reference.Font.ColorIndex = wdRed
End If