选择具有特定编号样式的列表

Question

使用以下条件时

Set r = ActiveDocument.Paragraphs(i).range
If r.ListFormat.ListTemplate.ListLevels(1).NumberStyle = wdListNumberStyleLowercaseRoman Then

我得到了

  

运行时错误＆＃39; 91＆＃39;：对象变量或未设置块变量

我设法使用AscW检查为具有特定项目符号的列表创建了一个类似的宏，但这里已经浪费了一整天而且仍然没有工作结果。

我做错了什么，怎么做对了？

是否可以使用this table中的值而不是wd-names？对于wdListNumberStyleLowercaseRoman，它将是＆＃34; 2＆＃34;根据表格。

Answer 1

使用课程ListParagraphs代替Paragraphs，可以使用wd-names及其值。