Форум по VBA и MS Office

Word => Макросы в Word => Тема начата: Peach от 30 марта 2021, 11:01

Название: Word VBA Макросы. Как с помощью макроса в надписи сделать перенос слов?
Отправлено: Peach от 30 марта 2021, 11:01
Как с помощью макроса в надписи сделать перенос слов?

В программе "Word" это делается так: щёлкните по рамке надписи правой кнопкой мыши - Формат фигуры... - справа появится область - вкладка "Параметры фигуры" - кнопка "Макет и свойства" - галочка "Переносить текст в фигуре по словам".
Название: Re: Word VBA Макросы. Как с помощью макроса в надписи сделать перенос слов?
Отправлено: Администратор от 30 марта 2021, 12:24
Макрос работает с выделенной надписью.

Sub Макрос()
    Selection.ShapeRange(1).TextFrame.WordWrap = True
End Sub
Название: Re: Word VBA Макросы. Как с помощью макроса в надписи сделать перенос слов?
Отправлено: Peach от 30 марта 2021, 15:16
Оно работает! Это просто восхитительно!