WORD VBA查找列表的最高列表级别号

Question

如何查找以下列表。我们已经知道ActiveDocument.Lists(1).ListParagraphs.Count给出了列表中的项目数：

OList = ActiveDocument.Lists(1)

例如，对于以下WORD文档列表，是否有任何WORD VBA属性将返回3 - 最高列表级别编号：

OR