TextEffectFormat.RotatedChars property (Publisher)
Returns msoTrue if characters in the specified WordArt are rotated 90 degrees relative to the WordArt's bounding shape. Returns msoFalse if characters in the specified WordArt retain their original orientation relative to the bounding shape. Read/write.
Syntax
expression.RotatedChars
expression A variable that represents a TextEffectFormat object.
Return value
Remarks
If the WordArt has horizontal text, setting the RotatedChars property to True rotates the characters 90 degrees counterclockwise.
If the WordArt has vertical text, setting the RotatedChars property to False rotates the characters 90 degrees clockwise.
Use the ToggleVerticalText method to switch between horizontal and vertical text flow.
The Flip method and Rotation property of the Shape object and the RotatedChars property and ToggleVerticalText method all affect the character orientation and direction of text flow in a Shape object that represents WordArt. You may have to experiment to find out how to combine the effects of these properties and methods to get the result you want.
Example
This example adds WordArt that contains the text Test to the active publication and rotates the characters 90 degrees counterclockwise.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.