Печать страницы - Word VBA Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?

Название: Word VBA Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?
Отправлено: Peach от 05 июня 2021, 18:14

Нужен макрос для замены знаков абзацев на пробелы в выделенном фрагменте текста в Word'е.

Название: Re: Word VBA Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?
Отправлено: Администратор от 05 июня 2021, 18:48

Sub Макрос()

With Selection.Range.Find
.Text = "^p"
.Replacement.Text = " "
.Execute Replace:=wdReplaceAll
End With

End Sub

Название: Re: Word VBA Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?
Отправлено: Peach от 05 июня 2021, 19:36

Всё убирает, как надо. Спасибо.

Форум по VBA и MS Office