Partager via


Méthode TextRange2.RotatedBounds (Office)

Cette méthode permet d'obtenir les coordonnées des sommets du cadre de délimitation du texte pour la plage de texte spécifiée. En lecture seule.

Syntaxe

expression. RotatedBounds (X1, Y1, X2, Y2, X3, x4, y4)

expression Expression qui renvoie un objet TextRange2 .

Paramètres

Nom Requis/Facultatif Type de données Description
X1 Obligatoire Unique Renvoie la position (en points) de la coordonnée X du premier sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
Y1 Obligatoire Unique Renvoie la position (en points) de la coordonnée Y du premier sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
X2 Obligatoire Unique Retourne la position (en points) de la coordonnée X du deuxième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
Y2 Obligatoire Unique Renvoie la position (en points) de la coordonnée Y du deuxième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
X3 Obligatoire Unique Renvoie la position (en points) de la coordonnée X du troisième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
Y3 Obligatoire Unique Renvoie la position (en points) de la coordonnée Y du troisième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
x4 Obligatoire Unique Renvoie la position (en points) de la coordonnée X du quatrième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.
y4 Obligatoire Unique Renvoie la position (en points) de la coordonnée Y du quatrième sommet du cadre englobant pour le texte dans la plage de texte spécifiée.

Remarques

Le cadre de délimitation du texte ne correspond pas à l'objet TextFrame2. L'objet TextFrame2 représente le conteneur où le texte peut résider. Le cadre de délimitation du texte représente le périmètre qui entoure directement le texte.

Exemple

Cet exemple utilise les valeurs renvoyées par les arguments de la méthode RotatedBounds pour dessiner une forme libre, dont les dimensions sont celles du cadre de délimitation du texte pour le troisième mot de la plage de texte dans la première forme de la première diapositive de la présentation active.

Dim x1 As Single, y1 As Single 
Dim x2 As Single, y2 As Single 
Dim x3 As Single, y3 As Single 
Dim x4 As Single, y4 As Single 
Dim myDocument As Slide 
 
Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes(1).TextFrame2.TextRange2.Words(3).RotatedBounds _ 
 x1, y1, x2, y2, x3, y3, x4, y4 
With myDocument.Shapes.BuildFreeform(msoEditingCorner, x1, y1) 
 .AddNodes msoSegmentLine, msoEditingAuto, x2, y2 
 .AddNodes msoSegmentLine, msoEditingAuto, x3, y3 
 .AddNodes msoSegmentLine, msoEditingAuto, x4, y4 
 .AddNodes msoSegmentLine, msoEditingAuto, x1, y1 
 .ConvertToShape.ZOrder msoSendToBack 
End With 

Voir aussi

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.