Partager via


Méthode Shapes.AddTextbox (Excel)

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 L’orientation de la zone de texte.
Left Obligatoire Unique Position (en points) du coin supérieur gauche de la zone de texte par rapport au coin supérieur gauche du document.
Top Obligatoire Unique La position (exprimée en points) du coin supérieur gauche de l’image par rapport au haut du document.
Width Obligatoire Unique Obtient la largeur de la cellule en points.
Height Obligatoire Unique Hauteur du tableau en points.

Valeur renvoyée

Forme

Exemple

Cet exemple montre comment ajouter une zone de texte contenant le texte Zone de test à myDocument.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, _ 
    100, 100, 200, 50) _ 
    .TextFrame.Characters.Text = "Test Box"

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.