Метод Font.Grow (Word)
Увеличивает размер шрифта до следующего доступного размера.
выражение. Grow
выражение (обязательно). Переменная, представляющая объект Font .
Если выделенный фрагмент или диапазон содержит несколько размеров шрифта, каждый размер увеличивается до следующего доступного параметра.
В этом примере увеличивается размер шрифта четвертого слова в новом документе.
Dim rngTemp As Range
Set rngTemp = Documents.Add.Content
rngTemp.InsertAfter "This is a test of the Grow method."
MsgBox "Click OK to increase the font size of the fourth word."
rngTemp.Words(4).Font.Grow
В этом примере увеличивается размер шрифта выделенного текста.
If Selection.Type = wdSelectionNormal Then
Selection.Font.Grow
Else
MsgBox "You need to select some text."
End If
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.