InlineShape.TextEffect (Word)

Retorna um objeto TextEffectFormat que contém as propriedades de formatação de efeito de texto para a forma embutida especificada. Somente leitura.

Set myDocument = ActiveDocument 
With myDocument.Shapes(3) 
 If .Type = msoTextEffect Then 
 .TextEffect.FontBold = True 
 End If 
End With