FontBold 属性

       

如果指定的艺术字对象中的文字加粗,则该值为 TrueMsoTriState 类型,可读写。

expression.FontBold

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

如果 myDocument 上的图形三是艺术字对象,则本示例将把该对象的字体加粗。

Set myDocument = Worksheets(1)
With myDocument.Shapes(3)
    If .Type = msoTextEffect Then
        .TextEffect.FontBold = msoTrue
    End If
End With