object that contains text-effect formatting properties for the specified shape. Applies to Shape
or ShapeRange
objects that represent WordArt.
expression.TextEffect
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example sets the font style to bold for shape three on myDocument
if the shape is WordArt.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3)
If .Type = msoTextEffect Then
.TextEffect.FontBold = True
End If
End With