ShapeRange.TextEffect (Word)
Retorna um objeto TextEffectFormat que contém as propriedades de formatação de efeito de texto para a forma especificada. Somente leitura.
Aplica-se a objetos ShapeRange que representam WordArt.
Dim sre As ShapeRange: Set sre =
Dim tefTextEffect As TextEffectFormat
Set tefTextEffect = sre.TextEffect