Shape.TextEffect (Word)
Retorna um objeto TextEffectFormat que contém as propriedades de formatação de efeito de texto para a forma especificada. Somente leitura.
Esta propriedade se aplica a objetos Shape que representam WordArt.
Set myDocument = ActiveDocument
With myDocument.Shapes(3)
If .Type = msoTextEffect Then
.TextEffect.FontBold = True
End If
End With