EndnoteOptions Object
Represents the properties assigned to a range or selection of endnotes in a document.
Using the EndnoteOptions object
Use the Range or Selection object to return an EndnoteOptions object. Using the EndnoteOptions object, you can assign different endnote properties to different areas of a document. For example, you may want endnotes in the introduction of a long document to be displayed as lowercase Roman numerals, while in the rest of your document they are displayed as Arabic numerals. The following example uses the NumberingRule, NumberStyle, and StartingNumber properties to format the endnotes in the first section ofthe active document.
Sub BookIntro()
Dim rngIntro As Range
'Sets the range as section one of the active document
Set rngIntro = ActiveDocument.Sections(1).Range
'Formats the EndnoteOptions properties
With rngIntro.EndnoteOptions
.NumberingRule = wdRestartSection
.NumberStyle = wdNoteNumberStyleLowercaseRoman
.StartingNumber = 1
End With
End Sub