TextEffectFormat.ToggleVerticalText, méthode (Word)

Cette méthode passe, dans l'objet WordArt spécifié, de l'orientation horizontale de l'enchaînement de texte à l'orientation verticale et vice-versa.

Syntaxe

expression. ToggleVerticalText

expression Obligatoire. Variable qui représente un objet « TextEffectFormat ».

Remarques

À l'aide de la méthode ToggleVerticalText inverse les valeurs des propriétés Width et Height de l'objet Shape qui représente le WordArt et conserve les propriétés Left et Top telles quelles.

La méthode Flip et propriété Rotation de l'objet Shape et la propriété RotatedChars et de la méthode ToggleVerticalText d'un objet TextEffectFormat affectent l'orientation des caractères et la direction d'enchaînement de texte dans un objet Shape qui représente l'objet WordArt. Vous devrez peut-être plusieurs essais pour savoir comment combiner les effets de ces propriétés et méthodes pour obtenir le résultat souhaité.

Exemple

Cet exemple montre comment ajouter un objet WordArt qui contient le texte « Test » au document actif, puis passer de la direction d'enchaînement de texte horizontale (par défaut pour le style de l'objet WordArt msoTextEffect1) à la direction verticale.

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

Voir aussi

Objet TextEffectFormat

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.