Свойство TextEffectFormat.FontName (Excel)

Возвращает или задает имя шрифта в указанном объекте WordArt. Для чтения и записи, String.

Синтаксис

expression. FontName

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

Пример

В этом примере задается имя шрифта Courier New для фигуры 3 в myDocument , если фигура — WordArt.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3) 
 If .Type = msoTextEffect Then 
 .TextEffect.FontName = "Courier New" 
 End If 
End With

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

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