Word VBA教程:Separator属性

应用于 CaptionLabel对象的 Separator属性。

返回或设置章节编号和序列编号间的字符。WdSeparatorType,可读写。

WdSeparatorType 可以是下列 WdSeparatorType 常量之一:
wdSeparatorColon
wdSeparatorEnDash
wdSeparatorPeriod
wdSeparatorEmDash
wdSeparatorHyphen

expression.Separator

expression   必需。该表达式返回一个CaptionLabel对象。

应用于 Endnotes 和 Footnotes对象的 Separator属性。

返回一个Range对象,该对象代表脚注或尾注的分隔符。

expression.Separator

expression   必需。该表达式返回以上一个对象。

应用于 TableOfAuthorities对象的 Separator属性。

返回或设置序列编号与页码之间的字符(最多 5 个)。默认字符为一个连字符 (-)。该属性对应于引文目录 (TOA) 域的 \d 开关。String 类型,可读写。

expression.Separator

expression   必需。该表达式返回一个TableOfAuthorities对象。

VBA示例

当应用于 CaptionLabel对象时。

本示例插入一个图表题注,在章节编号和序列编号间有一个冒号 (:)。


With CaptionLabels("Figure")
    .Separator = wdSeparatorColon
    .IncludeChapterNumber = True
End With
Selection.InsertCaption "Figure"

当应用于 Footnotes对象时。

本示例将脚注分隔符更改为一个单边框,此单边框从右边距缩进 3 英寸。


With ActiveDocument.Footnotes.Separator
    .Delete
    .Borders(wdBorderTop).LineStyle = wdLineStyleSingle
    .ParagraphFormat.RightIndent = InchesToPoints(3)
End With

当应用于 TableOfAuthorities对象时。

本示例将在活动文档的开头插入一个引文目录,然后设置目录的格式,使其包括用连字符 (-) 隔开的序列编号和页码。


Set myRange = ActiveDocument.Range(0, 0)
With ActiveDocument.TablesOfAuthorities.Add(Range:=myRange)
    .IncludeSequenceName = "Chapter"
    .Separator = "-"
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号