EndnoteOptions 对象

         
多种对象
EndnoteOptions

该对象代表指定给文档中尾注的某区域或所选内容的属性。

使用 EndnoteOptions 对象

使用 RangeSelection 对象可返回一个 EndnoteOptions 对象。使用 EndnoteOptions 对象可为文档的不同区域指定不同的尾注属性。例如,可将长文档说明部分的尾注用小写罗马数字显示,而文档中其余部分的尾注用阿拉伯数字显示。下列示例使用 NumberingRuleNumberStyleStartingNumber 属性设置活动文档中第一节的尾注格式。

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