Propriété TextEffectFormat.RotatedChars (Publisher)
Renvoie msoTrue si les caractères de l’objet WordArt spécifié sont pivotés de 90 degrés par rapport à la forme englobante de l’objet WordArt. Renvoie msoFalse si les caractères de l’objet WordArt spécifié conservent leur orientation d’origine par rapport à la forme englobante. Lecture-écriture.
Syntaxe
expression. RotatedChars
Expression Variable qui représente un objet TextEffectFormat .
Valeur renvoyée
Remarques
Si l'objet WordArt comporte du texte horizontal, la définition de la propriété RotatedChars sur True fait pivoter les caractères de 90 degrés vers la gauche.
Si l'objet WordArt comporte du texte vertical, la définition de la propriété RotatedChars sur False fait pivoter les caractères de 90 degrés vers la droite.
Utilisez la méthode ToggleVerticalText pour basculer entre le texte horizontal et vertical.
La méthode Flip et la propriété Rotation de l’objet Shape et la propriété RotatedChars et la méthode ToggleVerticalText affectent toutes l’orientation des caractères et la direction du flux de texte dans un objet Shape qui représente WordArt. Vous devrez peut-être effectuer diverses tentatives pour déterminer comment combiner les effets de ces propriétés et de ces méthodes pour obtenir le résultat escompté.
Exemple
Cet exemple montre comment ajouter un objet WordArt contenant le texte Test à la composition active et faire pivoter les caractères de 90 degrés dans le sens inverse des aiguilles d’une montre.
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
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour