多种对象![]() ![]() ![]() |
由 Footnote 对象所组成的集合,该集合的元素代表了选定内容、区域或文档中的所有脚注。
用 Footnotes 属性可返回 Footnotes 集合。下列示例将活动文档中的所有脚注都改成尾注。
ActiveDocument.Footnotes.SwapWithEndnotes
用 Add 方法可在 Footnotes 集合中添加脚注。下列示例在选定内容之后添加一个自动编号的脚注。
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Footnotes.Add Range:=Selection.Range , _
Text:="The Willow Tree, (Lone Creek Press, 1996)."
用 Footnotes (index) 可返回单个的 Footnote 对象,其中 index 是索引序号。索引序号代表脚注在选定内容、区域或文档中的位置。下列示例将选定内容中的第一个脚注设置为红色。
If Selection.Footnotes.Count >= 1 Then
Selection.Footnotes(1).Reference.Font.ColorIndex = wdRed
End If
将文档或节的结尾处的脚注看作是尾注并将其包含在 Endnotes 集合中。