Форум по VBA и MS Office

Word => Макросы в Word => Тема начата: Petrovich от 08 декабря 2016, 20:30

Название: Word: Как с помощью макроса увеличивать и уменьшать размер шрифта на 0,5?
Отправлено: Petrovich от 08 декабря 2016, 20:30
Приветствую всех!
А кто сможет подсказать, можно ли макросами увеличить или уменьшить размер шрифта выделенного текста на 0,5? Кнопки на панели word это позволяют сделать, но только на 1 пункт. А надо на 0,5 в большую или меньшую сторону!
Название: Re: Word: Как с помощью макроса увеличивать и уменьшать размер шрифта на 0,5?
Отправлено: Администратор от 08 декабря 2016, 22:24
Да, можно это сделать.

Уменьшение шрифта в выделенном тексте на 0,5:
Sub Макрос1()
    Selection.Font.Size = Selection.Font.Size - 0.5
End Sub

Увеличение шрифта в выделенном тексте на 0,5:
Sub Макрос2()
    Selection.Font.Size = Selection.Font.Size + 0.5
End Sub
Название: Re: Word: Как с помощью макроса увеличивать и уменьшать размер шрифта на 0,5?
Отправлено: Petrovich от 08 декабря 2016, 22:28
Благодарю!