如何使用Word VBA上的下一段

Question

我尝试使用以下

执行基于下一段落值的操作

If ActiveDocument.Paragraph.Next(wdParagraph).Range.Characters.Count > 1 Then

但是，我认为我没有正确使用.Next。我怎样才能在那行代码中使用它？

Answer 1

Next方法似乎并非在所有版本的Word VBA中都可用。根据此站点，它特定于Office 365。 https://msdn.microsoft.com/en-us/vba/word-vba/articles/paragraph-next-method-word 但是，您也没有正确使用它。以上网站显示以下语法。 Set myRange = ActiveDocument.Paragraphs(1).Next(Count:=n).Range 因此，逻辑是定义您现在的段落（Paragraphs(1)）并指定您使用相同的参数计算段落。因此，Next(wdParagraph)无需指定计数主题。相反，wdParagraph表示您希望指定您所在位置的第4段（wdParagraph = 4），如果您之前在语法中提供了该信息。