如果该属性值为 True,则在图表目录中包含题注标签和题注编号。Boolean 类型,可读写。
expression.IncludeLabel
expression 必需。该表达式返回一个 TableOfFigures 对象。
本示例为活动文档中的第一个图表目录设置格式,使其不包含题注标签(例如图表 1)。
If ActiveDocument.TablesOfFigures.Count >= 1 Then
ActiveDocument.TablesOfFigures(1).IncludeLabel = False
End If
本示例添加图表目录以替换所选内容,然后设置目录的格式,使其包含题注标签。
Dim tofTemp As TableOfFigures
Set tofTemp = ActiveDocument.TablesOfFigures _
.Add(Range:=Selection.Range, _
Caption:="Figure")
tofTemp.IncludeLabel = True