Edit

Share via

TextEffectFormat.ToggleVerticalText method (Publisher)

  • Article

Switches the text flow in the specified WordArt from horizontal to vertical, or vice versa.

Syntax

expression.ToggleVerticalText

expression A variable that represents a TextEffectFormat object.

Remarks

Using the ToggleVerticalText method swaps the values of the Left and Top properties of the Shape object that represents the WordArt, and leaves the Width and Height properties unchanged.

The Flip method and Rotation property of the Shape object and the RotatedChars property and ToggleVerticalText method all affect the character orientation and the 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 switches from horizontal text flow (the default for the specified WordArt style, msoTextEffect1) to vertical text flow.

Dim shpTextEffect As Shape 
 
Set shpTextEffect = ActiveDocument.Pages(1).Shapes.AddTextEffect _ 
 (PresetTextEffect:=msoTextEffect1, Text:="Test", _ 
 FontName:="Arial Black", FontSize:=36, _ 
 FontBold:=False, FontItalic:=False, Left:=100, Top:=100) 
 
shpTextEffect.TextEffect.ToggleVerticalText

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.