Автор Тема: Word VBA Макросы. Как заменить в выделенном фрагменте пробелы на табуляцию?  (Прочитано 260 раз)

Оффлайн Посетитель 28.09.2021

  • Посетитель форума
  • Сообщений: 6
Как заменить в выделенном фрагменте пробелы на табуляцию?
Пробел может быть один, может быть несколько подряд пробелов. Несколько подряд пробелов нужно заменить на один символ табуляции.

Онлайн Администратор

  • Administrator
  • Сообщений: 1952
Макрос
Sub Макрос()

    With Selection.Range.Find
        .Text = " {1;}"
        .Replacement.Text = "^t"
        .Forward = True
        .Wrap = wdFindStop
        .MatchWildcards = True
        .Execute Replace:=wdReplaceAll
    End With
   
End Sub

Оффлайн Посетитель 28.09.2021

  • Посетитель форума
  • Сообщений: 6