共用方式為

Word) (的 AutoCaption.CaptionLabel 屬性

  • 發行項

會傳回或設定標題標籤 ("估計，""表格"或"方程式"例如) 的指定的標題。 讀取/寫入 Variant 。

語法

expression。 CaptionLabel

表達 代表 'AutoCaption' 物件的變數。

註解

此屬性可以設定為字串或 WdCaptionLabelID 常數。

範例

此範例會顯示每個項目的名稱 (例如，"Microsoft Excel Worksheet") 及標題標籤 (例如，"Figure")，每個項目都會具有在插入時自動新增的標題。

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

另請參閱

AutoCaption 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。