Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Ajoute un nouvel objet Shape représentant une zone de texte à la collection Shapes spécifiée.
Syntaxe
expression. AddTextbox (Orientation, Left, Top, Width, Height)
expression Variable qui représente un objet Shapes.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Orientation | Requis | PbTextOrientation | Orientation de la zone de texte. |
| Gauche | Obligatoire | Variant | Position du bord gauche de la forme représentant la zone de texte. |
| Haut | Obligatoire | Variant | Position du bord supérieur de la forme représentant la zone de texte. |
| Largeur | Obligatoire | Variant | Largeur de la forme représentant la zone de texte. |
| Hauteur | Obligatoire | Variant | Hauteur de la forme représentant la zone de texte. |
Valeur renvoyée
Shape
Remarques
Pour les paramètres Left, Top, Width et Height , les valeurs numériques sont évaluées en points . les chaînes peuvent être dans n’importe quelle unité prise en charge par Microsoft Publisher (par exemple, « 2,5 pouces »).
Le paramètre Orientation peut être l’une des constantes PbTextOrientation déclarées dans la bibliothèque de type Microsoft Publisher et affichées dans le tableau suivant.
| Constante | Description |
|---|---|
| pbTextOrientationHorizontal | Zone de texte horizontale pour les langues dont le sens de lecture est de gauche à droite. |
| pbTextOrientationRightToLeft | Zone de texte horizontale pour les langues dont le sens de lecture est de droite à gauche. Cette valeur n'a aucun effet si aucune langue dont le sens de lecture est de droite à gauche n'est sélectionnée. |
| pbTextOrientationVerticalEastAsia | Zone de texte verticale pour les langues d'Asie de l'Est. Si une langue d’une région autre que l’Asie de l’Est est sélectionnée, le texte s’affiche en ayant subi une rotation de 90° vers la droite. |
Exemple
L’exemple ci-après ajoute une zone de texte horizontale à la première page de la composition active.
Dim shpTextBox As Shape
Set shpTextBox = ActiveDocument.Pages(1).Shapes.AddTextBox _
(Orientation:=pbTextOrientationHorizontal, _
Left:=144, Top:=144, _
Width:=72, Height:=18)
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.