AutoCaption.CaptionLabel 属性 (Word)

返回或设置的标题标签 ("图表、"表"或"公式，"例如) 指定题注。 读/写 Variant。

语法

expression。 CaptionLabel

表达 一个代表“AutoCaption”对象的变量。

备注

可以将此属性设置为字符串或 WdCaptionLabelID 常量。

示例

对于插入时自动添加题注的项目，本示例显示名称（如"Microsoft Excel 工作表"）和题注标签（如"图表"）。

Dim acLoop As AutoCaption 
 
For Each acLoop In AutoCaptions 
 If acLoop.AutoInsert = True Then MsgBox acLoop.Name _ 
 & vbCr & "Label = " & acLoop.CaptionLabel.Name 
Next acLoop

本例将 Word 表格的题注标签设为"Table"，然后在选定内容之后插入一张新表格。

With AutoCaptions("Microsoft Word Table") 
 .AutoInsert = True 
 .CaptionLabel = wdCaptionTable 
End With 
Selection.Collapse Direction:=wdCollapseEnd 
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=2, _ 
 NumColumns:=3

另请参阅

自动插入题注的对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。