Прочитать на английском

Поделиться через


Метод Font.Shrink (Word)

Уменьшает размер шрифта до следующего доступного размера.

Синтаксис

выражение. Shrink

Выражение Переменная, представляющая объект Font .

Замечания

Если выделенный фрагмент или диапазон содержит несколько размеров шрифта, каждый размер уменьшается до следующего доступного параметра.

Пример

В этом примере в новый документ вставляется строка из Z все меньшего размера.

Set myRange = Documents.Add.Content 
myRange.Font.Size = 45 
For Count = 1 To 5 
 myRange.InsertAfter "Z" 
 For Count2 = 1 to 3 
 myRange.Characters(Count).Font.Shrink 
 Next Count2 
Next Count

См. также

Объект Font

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.