Propriedade TextEffectFormat.RotatedChars (Excel)

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. MsoTriState de leitura/escrita.

Sintaxe

expressão. RotatedChars

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

Comentários

Se o WordArt tiver texto horizontal, a definição da propriedade RotatedChars como msoTrue gira os caracteres 90 graus no sentido anti-horário. Se o WordArt tiver texto vertical, a definição da propriedade RotatedChars como msoFalse 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 Rotation do objeto Shape e a propriedade RotatedChars e método ToggleVerticalText do objeto TextEffectFormat afetam a orientação de caracteres e a direção do fluxo de texto em um objeto Shape 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 a myDocument e roda os carateres 90 graus para a esquerda.

Set myDocument = Worksheets(1) 
Set newWordArt = myDocument.Shapes.AddTextEffect( _ 
 PresetTextEffect:=msoTextEffect1, Text:="Test", _ 
 FontName:="Arial Black", FontSize:=36, _ 
 FontBold:=False, FontItalic:=False, Left:=10, _ 
 Top:=10) 
newWordArt.TextEffect.RotatedChars = msoTrue

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.