通过

Word) (Document.Lists 属性

  • 项目

返回 列表 ，其中包含指定文档中的所有项目符号和编号的列表的集合。 此为只读属性。

语法

expression。 Lists

表达 一个代表 Document 对象的变量。

备注

有关返回集合的单个成员的信息，请参阅 从集合中返回对象。

示例

本示例将所选内容的格式设置为编号列表。 然后，该示例显示一个消息框，用于报告活动文档中的列表数。

Selection.Range.ListFormat.ApplyListTemplate _ 
 ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2) 
MsgBox "This document has " & ActiveDocument.Lists.Count _ 
 & " lists."

本示例设置活动文档中第三个列表的格式为默认的项目符号列表格式。 如果该列表已设置为项目符号列表格式，该示例清除此格式。

If ActiveDocument.Lists.Count >= 3 Then 
 ActiveDocument.Lists(3).Range.ListFormat.ApplyBulletDefault 
End If

本示例在一个消息框中显示 MyLetter.doc 的每一列表的项目数。

Set myDoc = Documents("MyLetter.doc") 
i = myDoc.Lists.Count 
For each li in myDoc.Lists 
 Msgbox "List " & i & " has " & li.CountNumberedItems _ 
 & " items." 
 i = i - 1 
Next li

另请参阅

Document 对象

支持和反馈

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