我有一个定义索引：
超人 - 意味着一个真正的超级老兄 Kryptonite - 意味着超人不喜欢的东西 等
我想在索引中循环遍历每个Paragraph（因为条目由＆＃34;输入＆＃34;分隔），并从其开始下划线直到{{1} }。
但是，我无法弄清楚如何使用索引。我可以更新索引（-），但无法弄清楚如何使用索引。我在想这样的事情：
ActiveDocument.Indexes(1).Update但当然，它在Sub underline_Index_Definitions()
Dim myDoc As Word.Document
Dim numParas&
Dim rng As Word.Range
Set myDoc = ActiveDocument
Debug.Print "You have : " & myDoc.Indexes.Count & " indexes."
numParas = myDoc.Indexes(1).Paragraphs.Count
For Each par In Indexes(1)
'Select the text from the start, until a dash
' blah blah blah
Next par
End With
End Sub
行出错，因为我无法做到这一点。我也不能numParas
答案 0 :(得分：1)
尝试
numParas = myDoc.Indexes(1).Range.Paragraphs.Count
你经常会在Word中得到这个 - 当看起来像文字一样的东西时＃34;并没有给你Paragarphs，Words等等。看看是否＆＃34;某事＆＃34;有一个Range对象（通常是它）。
请注意，Index.Range包含三个额外的段落，您可能无法识别并且需要在循环中处理。