Range.EndnoteOptions Property (Word)

Returns an EndnoteOptions object that represents the endnotes in a range.

expression .EndnoteOptions

expression Required. A variable that represents a Range object.

This example sets the starting number for endnotes in section two of the active document to one if the starting number is not one.

Sub SetEndnoteOptionsRange() 
 With ActiveDocument.Sections(2).Range.EndnoteOptions 
 If .StartingNumber <> 1 Then 
 .StartingNumber = 1 
 End If 
 End With 
End Sub