Найти и если .... заменить

[ange]

Добрый день.
У меня есть док-т Word очень длинный. В нем внутри теста очень много переходов на новую строку. Хочу их поубирать.

То есть найти "переход на новую строку", определить, какой символ следующий - если тоже "переход на новую строку", то ничего, в противном случае заменить "переход на новую строку" на пробел.

В связи с этим 2 вопроса
1) как написать цикл While (не конец файла)
тогда внутри цикла напишу selection.find.text=chr(11)
2) как проверить условие, является ли и следующий после найденного символа символ "перехода на новую строку"


Заранее очень благодарна за помощь

[alibek]

Найти: ^p^p
Заменить: ***NEWLINE***

Найти: ^p
Заменить: (пробел)

Найти: ***NEWLINE***
Заменить: ^p

[uhm]

Все можно сделать без макросов, через вордовский "Поиск и замена", правда, несколько "непрямым" способом . Ctrl+H, в поле "найти" ставим "^p^p" (без кавычек, буквы латинские), в поле "заменить на" - какой-нибудь неиспользуемый в документе специальный символ ("^%", например - знак "конца раздела"). Потом одинарные концы строки ("^p") заменить на пробелы. Потом концы раздела обратно поменять на концы строки. Вуаля

[ange]

ок, спасиьбо одно но
в документе не "переходы на новую строку" a chr(11)

как найти эти два символа подряд?

[uhm]

^l^l вместо ^p^p попробуй.