Question

Document TablesOfAuthorities 多种对象

该集合对象由 TableOfAuthorities 对象（TOA 域）组成，这些对象代表文档中的引文目录。

使用 TablesOfAuthorities 集合

使用 TablesOfAuthorities 属性可返回 TablesOfAuthorities 集合。下列示例对活动文档中的所有引文目录应用“古典”内置样式。

ActiveDocument.TablesOfAuthorities.Format = wdTOAClassic

使用 Add 方法可将引文目录添至文档。引文目录是基于文档中的 TA（引文目录项）域建立的。下列示例在活动文档的起始处添加一个包含所有类别的引文目录。

Set myRange = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.TablesOfAuthorities.Add Range:=myRange, _
 Passim:=True, Category:=0, EntrySeparator:= ", "

使用 TablesOfAuthorities(index) 可返回单独的 TableOfAuthorities 对象，其中index 为索引序号。索引序号表示文档中引文目录的位置。下列示例在活动文档的第一个引文目录中插入分类页眉，然后更新该目录。

With ActiveDocument.TablesOfAuthorities(1)
 .IncludeCategoryHeader = True
 .Update
End With