2016-04-08 1 views
0

私は定義のインデックスがあります.Selectionまたは変数を持つ索引で作業しますか?

スーパーマンは - 本当にスーパー男
クリプトナイトを意味 - スーパーマンは
など

を好きではない何かを意味し、私は(以降、各Paragraphをループしたいと思いますエントリは "Enter"で区切られています)、インデックスの最初から-まで下線を引いています。

ただし、インデックスの操作方法を理解できません。インデックス(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行でエラーが出て:私はこのような何かを考えていました。かどうかを見るなど、言葉、「テキストなどを」見える何かがあなたにParagarphsを与えないとき - 私はまたmyDoc.Indexes(1).Select // With Selection ...

答えて

1

Wordで、多くの場合、これを取得します

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

を試してみてくださいを行うことはできません「何か」にはRangeオブジェクトが含まれていることがよくあります。

Index.Rangeには、おそらく認識できない3つの余分な段落が含まれており、ループで処理する必要があることに注意してください。

+0

ありがとうございます!その間の '.Range'は、私が逃したものでした。とても有難い! – BruceWayne

関連する問題