In einem Index mit .Selection oder einer Variable arbeiten?

Question

Ich habe einen Index von Definitionen:

Superman - bedeutet ein wirklich super Geck
Kryptonite - bedeutet, etwas Übermensch nicht
mag usw.

I Schleife möchte jeden durch Paragraph (seit die Einträge werden durch "Enter" getrennt) im Index und unterstreichen ab dem Start bis -.

Allerdings kann ich nicht herausfinden, wie man mit einem Index arbeitet. Ich kann den Index aktualisieren (ActiveDocument.Indexes(1).Update), kann aber nicht herausfinden, wie man mit dem Index arbeitet. Ich war so etwas wie dieses Denken:

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 

Aber natürlich ist es Fehler bei der numParas Linie aus, da ich das nicht kann. Ich kann auch nicht myDoc.Indexes(1).Select // With Selection ...

Answer 1

Versuchen

numParas = myDoc.Indexes(1).Range.Paragraphs.Count 

Sie finden diese in Word oft bekommen - wenn etwas, das „text-like“ nicht geben Sie Paragarphs, Worte Optik usw. sehen, ob Das "Etwas" hat ein Range-Objekt (oft tut es das).

Beachten Sie, dass die Index.Range drei zusätzliche Absätze enthält, die Sie wahrscheinlich nicht erkennen und in einer Schleife verarbeiten müssen.