Propriété TextEffectFormat.RotatedChars (PowerPoint)

  • Article

Détermine si les caractères dans l’objet WordArt spécifié sont pivotés de 90 degrés par rapport à la forme encadrant l’objet WordArt. Lecture-écriture.

Syntaxe

expression. RotatedChars

Expression Variable qui représente un objet TextEffectFormat .

Valeur renvoyée

MsoTriState

Remarques

Si l'objet WordArt contient du texte horizontal, la définition de la propriété RotatedChars sur msoTrue fait pivoter les caractères de 90 degrés dans le sens inverse des aiguilles d'une montre. Si l'objet WordArt contient du texte vertical, la définition de la propriété RotatedChars sur msoFalse les fait pivoter de 90 degrés dans le sens des aiguilles d'une montre. 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 de l’objet TextEffectFormat 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 plusieurs essais pour savoir comment combiner les effets de ces propriétés et méthodes pour obtenir le résultat souhaité.

La valeur de la propriété RotatedChars peut être l’une de ces constantes MsoTriState.

Constante Description
msoFaux Les caractères contenus dans l'objet WordArt spécifié conservent leur orientation d'origine par rapport à la forme de délimitation.
msoVrai Les caractères contenus dans l’objet WordArt spécifié sont pivotés de 90 degrés par rapport à la forme de délimitation de l’objet WordArt.

Exemple

Cet exemple montre comment ajouter un objet WordArt contenant le texte « Test » à myDocument et faire pivoter les caractères de 90 degrés dans le sens inverse des aiguilles d’une montre.

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

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.