Propriedade TextEffectFormat.RotatedChars (PowerPoint)
Determina se os caracteres no WordArt especificado irão girar 90 graus em relação à forma delimitadora do WordArt. Leitura/gravação.
Sintaxe
expression. 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 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ê precise experimentar para descobrir como combinar os efeitos dessas propriedades e métodos para obter o resultado desejado.
O valor da propriedade RotatedChars pode ser uma destas constantes MsoTriState.
Constante | Descrição |
---|---|
msoFalse | Os caracteres do WordArt especificado preservarão sua orientação em relação à forma delimitadora. |
msoTrue | Os caracteres no WordArt girarão 90 graus em relação à forma delimitadora do WordArt. |
Exemplo
Este exemplo adiciona o WordArt que contém o texto "Test" ao myDocument e gira os caracteres 90 graus no sentido anti-horário.
Set myDocument = ActivePresentation.Slides(1)
Set newWordArt = myDocument.Shapes.AddTextEffect _
(PresetTextEffect:=msoTextEffect1, Text:="Test", _
FontName:="Arial Black", FontSize:=36, _
FontBold:=msoFalse, FontItalic:=msoFalse, Left:=10, Top:=10)
newWordArt.TextEffect.RotatedChars = msoTrue
Confira também
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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: ao longo de 2024, vamos eliminar problemas do GitHub como o mecanismo de comentários para conteúdo e substituí-lo por um novo sistema de comentários. Para obter mais informações, consulte:Enviar e exibir comentários de