Word) (ListFormat.ApplyListTemplate 方法

將一組清單格式設定特性套用至指定的 ListFormat 物件。

語法

運算式。 ApplyListTemplate( _ListTemplate_ , _ContinuePreviousList_ , _ApplyTo_ , _DefaultListBehavior_ )

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

參數

名稱	必要/選用	資料類型	描述
ListTemplate	必要	ListTemplate	要套用的清單範本。
ContinuePreviousList	選用	Variant	True 可繼續上一個清單的編號 為 false ，開始新的清單。
ApplyTo	選用	Variant	是要套用至清單範本的清單部分。 可以是下列其中一個 WdListApplyTo 常數： wdListSelection 、 wdListWholeList 或 wdListThisPointForward 。
DefaultListBehavior	選用	Variant	會設定指定是否 Microsoft Word 針對新的 Web 導向格式較佳的清單中顯示的值。 可以是下列 WdDefaultListBehavior 常數之一： wdWord8ListBehavior (使用與 Microsoft Word 97 相容的格式) 或 wdWord9ListBehavior (使用 Web 導向格式)。 相容性原因的預設常數 wdWord8ListBehavior ，但是在新的程序所應使用 wdWord9ListBehavior 充分運用改善 Web 導向格式相對於縮排和多層次清單。

範例

此範例會將 myRange 變數設為使用中文件的某個範圍，然後會檢查該範圍是否具有清單格式設定。 如果尚未套用任何清單格式設定，則會將第四個大綱編號清單範本套用至該範圍。

Set myDoc = ActiveDocument 
Set myRange = myDoc.Range( _ 
 Start:= myDoc.Paragraphs(3).Range.Start, _ 
 End:=myDoc.Paragraphs(6).Range.End) 
If myRange.ListFormat.ListType = wdListNoNumbering Then 
 myRange.ListFormat.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdOutlineNumberGallery) _ 
 .ListTemplates(4) 
End If

另請參閱

ListFormat 物件

支援和意見反應

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