Shape.TextEffect (PowerPoint)
Returns a TextEffectFormat object that contains text-effect formatting properties for the specified shape.
Applies to Shape objects that represent WordArt.
Dim tefTextEffect As TextEffectFormat
Set tefTextEffect = ActivePresentation.Slides(1).Shapes(1).TextEffect