TextEffect Property Example
This example sets the font style to bold for shape three on myDocument if the shape is WordArt.
myDocument
Set myDocument = Worksheets(1) With myDocument.Shapes(3) If .Type = msoTextEffect Then .TextEffect.FontBold = True End If End With