Table.AutoFormat 方法 (Word)

會將預先定義的外觀套用至表格。

語法

expression。 AutoFormat( _Format_ , _ApplyBorders_ , _ApplyShading_ , _ApplyFont_ , _ApplyColor_ , _ApplyHeadingRows_ , _ApplyLastRow_ , _ApplyFirstColumn_ , _ApplyLastColumn_ , _AutoFit_ )

需要 expression。 代表 'Table' 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Format	選用	Variant	要套用的格式。 此參數可以是 WdTableFormat 常數、 WdTableFormatApply 常數或 TableStyle 物件。
ApplyBorders	選用	Variant	True 是表示 套用指定之格式的框線屬性。 預設值為 True 。
ApplyShading	選用	Variant	True 是表示 套用指定之格式的陰影屬性。 預設值為 True 。
ApplyFont	選用	Variant	True 是表示 套用指定之格式的字型屬性。 預設值為 True 。
ApplyColor	選用	Variant	True 是表示 套用指定之格式的色彩屬性。 預設值為 True 。
ApplyHeadingRows	選用	Variant	True 是表示 套用指定之格式的標題列屬性。 預設值為 True 。
ApplyLastRow	選用	Variant	True 是表示 套用指定之格式的末列屬性。 預設值為 False 。
ApplyFirstColumn	選用	Variant	True 是表示 套用指定之格式的首欄屬性。 預設值為 True 。
ApplyLastColumn	選用	Variant	True 是表示 套用指定之格式的末欄屬性。 預設值為 False 。
AutoFit	選用	Variant	則為 true 可減少儘可能表格欄寬而不變更方式的文字自動換列的儲存格中。 預設值為 True。

註解

此方法的引數會對應至 [表格自動格式設定] 對話方塊中的選項。

範例

這個範例會在新文件中建立 5x5 表格，並且將 Colorful 2 格式的所有屬性套用至該表格。

Set newDoc = Documents.Add 
Set myTable = newDoc.Tables.Add(Range:=Selection.Range, _ 
 NumRows:=5, NumColumns:=5) 
myTable.AutoFormat Format:=wdTableFormatColorful2

這個範例會將 Classic 2 格式的所有屬性套用至插入點目前所在的表格。 如果插入點不在表格中，就會顯示訊息方塊。

Selection.Collapse Direction:=wdCollapseStart 
If Selection.Information(wdWithInTable) = True Then 
 Selection.Tables(1).AutoFormat Format:=wdTableFormatClassic2 
Else 
 MsgBox "The insertion point is not in a table." 
End If

另請參閱

Table 物件

支援和意見反應

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