共用方式為

List.ApplyListTemplate 方法 (Word)

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

語法

表情。ApplyListTemplate (ListTemplate、 ContinuePreviousList、 ApplyTo、 DefaultListBehavior)

需要 expression。 代表 List 物件的變數。

參數

名稱 必要/選用 資料類型 描述
ListTemplate 必要 ListTemplate 要套用的清單範本。
繼續上一頁列表 選用 Variant True 可繼續上一個清單的編號 為 false ，開始新的清單。
申請 選用 Variant 是要套用至清單範本的清單部分。 可以是以下 WdListApplyTo 常數之一： wdListApplyToSelection、 wdListApplyToWholeList 或 wdListApplyToThisPointForward。
預設清單行為 選用 Variant 設定一個值，指定 Microsoft Word 是否採用新的網頁導向格式以改善清單顯示。 可以是以下 WdDefaultListBehavior 常數之一：wdWord8ListBehavior (使用與 Microsoft Word 97) 格式相容的格式，或 wdWord9ListBehavior (使用網頁導向格式) 。

出於相容性考量，預設常數為 wdWord8ListBehavior，但在新程序中，應使用 wdWord9ListBehavior ，以利用網頁格式改進後縮排與多層級清單。

範例

這個範例會將 變數 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

支援和意見反應

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

  • Last updated on