Propriedade TextEffectFormat.RotatedChars (Publisher)

Devolve msoTrue se os carateres no WordArt especificado forem rodados 90 graus em relação à forma delimitadora do WordArt. Devolve msoFalse se os carateres no WordArt especificado mantiverem a orientação original em relação à forma delimitadora. Leitura/gravação.

Sintaxe

expressão. RotatedChars

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

Valor de retorno

MsoTriState

Comentários

Se o WordArt tiver texto horizontal, a definição da propriedade RotatedChars como True gira os caracteres 90 graus no sentido anti-horário.

Se o WordArt tiver texto vertical, a definição da propriedade RotatedChars como False gira os caracteres 90 graus no sentido horário.

Use o método ToggleVerticalText para alternar entre o fluxo de texto horizontal e vertical.

O método Flip e a propriedade Rotação do objeto Shape e a propriedade RotatedChars e o método ToggleVerticalText afetam a orientação do caráter e a direção do fluxo de texto num objeto Forma que representa o WordArt. Talvez você tenha de experimentar para descobrir a maneira de combinar os efeitos dessas propriedades e métodos, a fim de obter o resultado desejado.

Exemplo

Este exemplo adiciona WordArt que contém o texto Teste à publicação ativa e roda os carateres 90 graus para a esquerda.

Sub CreateFormatWordArt() 
 With ActiveDocument.Pages(1).Shapes _ 
 .AddTextEffect(PresetTextEffect:=msoTextEffect1, _ 
 Text:="Test", FontName:="Arial Black", FontSize:=36, _ 
 FontBold:=False, FontItalic:=False, Left:=10, Top:=10) 
 .TextEffect.RotatedChars = msoTrue 
 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.