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 支持和反馈,获取有关如何接收支持和提供反馈的指南。