ListFormat.ApplyOutlineNumberDefault 方法 (Word)

默认的大纲编号方案向指定的 ListFormat 对象范围中的段落。

语法

expressionApplyOutlineNumberDefault( _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

另请参阅

ListFormat 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。