1) Непонятно что означает "от home до end" ? Имеется в виду нажатие клавиш
в активном документе ? Вы уверены что правильно сформулировали вопрос и вас действительно интересуют строки
внешнего представления документа (без связи
с данными). Поясню, что я имею в виду.
a) aaaaaaaaaaaaaaaaaaa;bbbbbbbbbbbbbbbb;cccccccccccccccccccccc\n ddddddddd
b) aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa;bbbbbbbbbbbbbbbbbbbbbbbbb;ccccccccccccccccccccc
ddddddddddddddddd
в варианте a) переход на новую строку осуществляется поле кода chr(13)
в варианте b) 2-я строка начинается без специального разделителя
2) Если " в тексте n строк, нужно выбрать от 1 до n", то это означает что выбирается весь текст что противоречит
Подскажите, пожалуйста, как выбрать конкретную строку (например, пятую),
Или мы должны догадаться
что обработка вам нужна для
каждой строки?
3) Вы имеете в виду a(1) = первое слово , b(1) = второе слово, c(1) = третье слово ?
закинуть первое слово в один массив, второе слово в другой массив, третье слово в третий массив.
Или всё таки не в "другой массив" а в другой
элемент массива ?
Резюмируя ещё раз : "нужно чётче формулировать вопрос"
Если предположить, что вам нужно обработать документ
каждая строка которого
представляет собой
параграф и содержит 3 слова разделённых ";" , то это будет выглядеть так:
Код: Выделить всё
Public Sub Example()
Dim w As Range
Dim a(1 To 3) As String
Dim i As Long
i = 1
With ActiveDocument
For i = 1 To .Words.Count Step 6
a(1) = .Words(i)
a(2) = .Words(i + 2)
a(3) = .Words(i + 4)
' выводим очередные 3 слова как элементы массива a
Debug.Print a(1), a(2), a(3)
Next i
End With
End Sub