Форум по VBA, Excel и Word

Word => Макросы в Word => Тема начата: persik от 05 Июнь 2021, 18:14

Название: Word VBA Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?
Отправлено: persik от 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 Макросы. Как заменить знаки абзацев на пробелы с помощью макроса?
Отправлено: persik от 05 Июнь 2021, 19:36
Всё убирает, как надо. Спасибо.