RE: Как в Word 2007 объединить несколько абзацов в один?

[Антон Кокин]

Выделите текст и примените следующий макрос:

Sub delPar_ak()
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "^p" 'искомый знак абзаца
.Format = False
.Replacement.Text = "^s" 'заменяем на неразрывный пробел
.Forward = True
.Wrap = wdFindStop
.Execute Replace:=wdReplaceAll
End With
Selection.Collapse direction:=wdCollapseStart 'снимаем выделение
End Sub

--
===================
http://wordexpert.ru - WordExpert.ru - профессиональная работа с текстом

"voya" пишет:

> Некоторые текстовые файлы построены так, что каждая строка - это абзац. Как в
> Ворде сделать, чтобы выделил несколько таких строк - и объединил их в один
> абзац, т.е. фактически убрал в конце каждой строки знак "перенос каретки".

[voya]