多种对象 EndnoteOptions | 
该对象代表指定给文档中尾注的某区域或所选内容的属性。
使用 Range 或 Selection 对象可返回一个 EndnoteOptions 对象。使用 EndnoteOptions 对象可为文档的不同区域指定不同的尾注属性。例如,可将长文档说明部分的尾注用小写罗马数字显示,而文档中其余部分的尾注用阿拉伯数字显示。下列示例使用 NumberingRule、NumberStyle 和 StartingNumber 属性设置活动文档中第一节的尾注格式。
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