Propriedade TextEffectFormat.PresetShape (Publisher)

Devolve ou define uma constante MsoPresetTextEffectShape que representa a forma do WordArt especificado. Leitura/gravação.

Sintaxe

expressão. Forma Predefinida

expressão Uma variável que representa um objeto TextEffectFormat .

Valor de retorno

MsoPresetTextEffectShape

Comentários

O valor da propriedade PresetShape pode ser uma das constantes MsoPresetTextEffectShape declaradas na biblioteca de tipos do Microsoft Office.

Exemplo

Este exemplo define a forma da primeira forma na primeira página da publicação ativa como uma divisa cujo centro aponta para baixo. Para que este exemplo funcione, a primeira forma tem de ser uma forma WordArt.

Sub ChangeTextEffect() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = msoTextEffect Then 
 .TextEffect.PresetShape = msoTextEffectShapeChevronDown 
 End If 
 End With 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.