指定した行に文字を入力するVBAコードは？

質問

ワードのマクロで、「上から6行目に文字を入れる」
と言う事をしたい場合は、
------------------
Sub Macro1()
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph

Selection.TypeText Text:="あああ"
End Sub

や

Sub Macro2()
Dim i As Long

For i = 1 To 5
Selection.TypeParagraph
Next

Selection.TypeText Text:="あああ"
End Sub
------------------
としなくては駄目でしょうか？

エクセルのように、「●行目に文字を入力する」と指定できないかどうかが知りたいです。

オブジェクトブラウザで「Range」を検索したら、Rangeオブジェクトがあったので、
行の指定ができるのかな？と思いました。

ご教授よろしくお願いします。

回答No.1

notnot · ベストアンサー

activedocument.Paragraphs(6).Range.Text= "ああああ"

とか。

お礼

うーん、なぜでしょう？
頂いたコードを実行すると、

「実行時エラー:「5941」指定されたコレクションのメンバは存在しません。」

になってしまいます。