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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。