Количество строк в документе Word

[Железяка]

Здравствуйте все.
Кто может подсказать как определить количество строк в Вордовском документе и соответственно обратиться к какой-либо n-ой строке?
Весь текст у меня получилось получить через ActiveDocument.Content. Осталось теперь посчитать сколько там строк =) Если конечно такое можно сделать.
Заранее спасибо.

[GSerg]

Document.ComputeStatistics(wdStatisticLines)

Document.GoTo wdGotoLine, wdGoToAbsolute, N

[golodov]

Document.ComputeStatistics(wdStatisticLines)



Document.GoTo wdGotoLine, wdGoToAbsolute, N

Подскажите, как сделать тоже самое, только через Com соединение? Пишет что wdStatisticLines и wdstatistic.wdStatisticLines не заданы

[pronto]

В меню Project > References должен быть выбран «Microsoft Word [11 | 12 | 13 и тд] Object Library»
Ну и, конечно же, должны быть созданы соответствующие объекты

Код: Выделить всё

Dim wrdApp As Word.Application
Dim wrdDoc As Word.Document

Set wrdApp = CreateObject("Word.Application")
Set wrdDoc = wrdApp.Documents.Add