共用方式為

Word) (ListFormat.ApplyBulletDefault 方法

  • 發行項

將項目符號和格式套用至所指定的 ListFormat 物件範圍內的段落。

語法

expression。 ApplyBulletDefault( _DefaultListBehavior_ )

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

參數

名稱 必要/選用 資料類型 描述
DefaultListBehavior 選用 Variant 會設定指定是否 Microsoft Word 針對新的 Web 導向格式較佳的清單中顯示的值。 可以是下列常數之一： wdWord8ListBehavior (使用與 Microsoft Word 97 相容的格式) 或 wdWord9ListBehavior (使用 Web 導向格式)。 相容性原因的預設常數 wdWord8ListBehavior ，但是在新的程序所應使用 wdWord9ListBehavior 充分運用改善 Web 導向格式相對於縮排和多層次清單。

註解

如果這些段落已經使用項目符號格式化，這個方法就會移除項目符號和格式設定。

範例

這則範例會將項目符號和格式設定加入至選取項目中的段落。 如果選取項目中已經有項目符號，此範例就會移除項目符號和格式設定。

Selection.Range.ListFormat.ApplyBulletDefault

這則範例會在 MyDoc.doc 的第二個段落中加入一個項目符號和格式設定，或是移除這些項目符號和格式設定。

Documents("MyDoc.doc").Paragraphs(2).Range.ListFormat _ 
 .ApplyBulletDefault

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

另請參閱

ListFormat 物件

支援和意見反應

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