本示例显示区域中的编号列表的数目。

MsgBox Selection.Range.ListParagraphs.Count