Shapes.AddTextbox, méthode (PowerPoint)
Cette méthode crée une zone de texte. Renvoie un objet Shape qui représente la nouvelle zone de texte.
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 | Obligatoire | MsoTextOrientation | Orientation du texte. Certaines de ces constantes ne soient pas disponibles, en fonction de la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée. |
| Left | Obligatoire | Unique | Position, exprimée en points, du bord gauche de la zone de texte par rapport au bord gauche de la diapositive. |
| Top | Obligatoire | Unique | Position, exprimée en points, du bord supérieur de la zone de texte par rapport au bord supérieur de la diapositive. |
| Width | Obligatoire | Unique | Largeur de la zone de texte, exprimée en points. |
| Height | Obligatoire | Unique | Hauteur de la zone de texte, exprimée en points. |
Valeur renvoyée
Shape
Exemple
Cet exemple montre comment ajouter une zone de texte qui contient le texte « Test Box » à myDocument.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
Left:=100, Top:=100, Width:=200, Height:=50).TextFrame _
.TextRange.Text = "Test Box"
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.