EntrySeparator 属性

       

返回或设置分隔引文目录词条以及页码的符号(可多达五个)。默认值为一个带圆点前导符的制表符。与 TOA(引文目录)域的 \e 开关相对应。String 类型,可读写。

示例

本示例在活动文档中插入一个引文目录,然后将该目录的格式设置为在引文项和对应的页码之间用逗号分隔。

Dim rngTemp As Range
Dim toaLoop As TableOfAuthorities

Set rngTemp = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.TablesOfAuthorities.Add _
    Range:=rngTemp, Category:=1
For Each toaLoop In ActiveDocument.TablesOfAuthorities
    toaLoop.EntrySeparator = ", "
Next toaLoop

本示例返回第一个引文目录词条的分隔符。

Dim strSeparator

strSeparator = _
    ActiveDocument.TablesOfAuthorities(1).EntrySeparator