ApplyNumberDefault 方法

本方法为指定的 ListFormat 对象向区域中的段落添加默认的编号格式。如果段落已设置了编号列表格式，此方法将清除其中已有的编号和格式。

expression   必需。该表达式返回一个 ListFormat 对象。

DefaultListBehavior   Variant 类型，可选。该设置值可指定 Microsoft Word 是否使用新的 Web 页格式，以便项目列表具有更好的显示效果。其值可取下列常量之一：wdWord8ListBehavior（使用与 Microsoft Word 97 兼容的格式）或 wdWord9ListBehavior（使用适于 Web 的格式）。考虑到兼容问题，默认值为 wdWord8ListBehavior。但是在新建过程中若要建立缩进式多级项目列表，应当使用 wdWord9ListBehavior，以利用改进过的适用于 Web 页的格式。

示例

本示例实现的功能是：为选定内容中的段落进行编号。如果选定内容中已经有编号列表，本示例将清除其中的编号和格式。

Selection.Range.ListFormat.ApplyNumberDefault

本示例实现的功能是：将变量 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.ApplyNumberDefault
End If