ListFormat.ApplyOutlineNumberDefault 方法 (Word)
將預設的大綱編號配置新增至指定的 ListFormat 物件範圍中的段落。
語法
expression。 ApplyOutlineNumberDefault( _DefaultListBehavior_ )
需要 expression。 代表 'ListFormat' 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| DefaultListBehavior | 選用 | Variant | 會設定指定是否 Microsoft Word 針對新的 Web 導向格式較佳的清單中顯示的值。 可以是下列常數之一： wdWord8ListBehavior (使用與 Microsoft Word 97 相容的格式) 或 wdWord9ListBehavior (使用 Web 導向格式)。 相容性原因的預設常數 wdWord8ListBehavior ，但是在新的程序所應使用 wdWord9ListBehavior 充分運用改善 Web 導向格式相對於縮排和多層次清單。 |
註解
如果這些段落已經格式化成大綱編號清單，這個方法就會移除編號和格式設定。 不過，這個方法不會移除已經套用至這些段落的內建標題樣式。
範例
這則範例會將大綱編號加入至選取項目中的段落。 如果選取項目已經是大綱編號清單，此範例就會移除編號和格式設定。
Selection.Range.ListFormat.ApplyOutlineNumberDefault
這個範例會將變數 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.ApplyOutlineNumberDefault
End If
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。