List.ApplyListTemplateWithLevel 方法 (Word)

  • 项目

（可选）对指定级别应用一组列表格式特征。

语法

expression。 ApplyListTemplateWithLevel( _ListTemplate_ , _ContinuePreviousList_ , _DefaultListBehavior_ , _ApplyLevel_ )

表达 一个代表“List”对象的变量。

参数

名称 必需/可选 数据类型 说明
ListTemplate 必需 ListTemplate 要应用的列表模板。
ContinuePreviousList 可选 Variant 如此 继续编排页码从前面的列表; 假 以启动一个新的列表。
DefaultListBehavior 可选 Variant 设置一个值，指定是否 Microsoft Word 使用新的面向 Web 的格式更好的列表中显示。 可以是下列的 WdDefaultListBehavior 常量: wdWord8ListBehavior (使用与 Microsoft Word 97 兼容格式) 或 wdWord9ListBehavior (使用面向 Web 的格式)。 出于兼容性原因，默认常量 wdWord8ListBehavior ，但在新的过程中应使用 wdWord9ListBehavior 来利用改进的面向 Web 的格式设置缩进和多级列表。
ApplyLevel 可选 Variant 要应用列表模板的级别。

示例

以下示例将 变量 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。