List.CountNumberedItems 方法 (Word)

返回在指定 列表 中项目符号或编号项和 LISTNUM 域的数目。

语法

expression。 CountNumberedItems

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

示例

本示例用第二种编号列表模板为当前选定内容设置列表格式。 然后，该示例计算活动文档中的编号、项目符号项和 LISTNUM 域的数目并在一个消息框中显示统计结果。

Selection.Range.ListFormat.ApplyListTemplate _ 
    ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2) 
Msgbox ActiveDocument.CountNumberedItems

本示例统计活动文档中一级编号或项目符号项目数。

Msgbox ActiveDocument.Content.ListFormat _ 
    .CountNumberedItems(Level:=1)

本示例对 myRange 变量在 LISTNUM 区域计数。

结果显示于消息框内。

Set myDoc = ActiveDocumentSet myRange = _ 
    myDoc.Range(Start:=myDoc.Paragraphs(12).Range.Start, _ 
    End:=myDoc.Paragraphs(50).Range.End) 
numfields = myRange.ListFormat.CountNumberedItems(wdNumberListNum) 
Msgbox numfields

另请参阅

列表对象

支持和反馈

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