Свойство Font.Size (Word)
Возвращает или задает размер шрифта в пунктах. Для чтения и записи, Single.
expression. Размер
выражение (обязательно). Переменная, представляющая объект Font .
В этом примере текст вставляется, а затем устанавливается размер шрифта седьмого слова вставленного текста в 20 точек.
Selection.Collapse Direction:=wdCollapseEnd
With Selection.Range
.Font.Reset
.InsertBefore "This is a demonstration of font size."
.Words(7).Font.Size = 20
End With
В этом примере определяется размер шрифта выделенного текста.
mySel = Selection.Font.Size
If mySel = wdUndefined Then
MsgBox "there is a mix of font sizes in the selection."
Else
MsgBox mySel & " points"
End If
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.