Partager via


Shapes.AddLabel, méthode (Excel)

Cette méthode crée une étiquette. Renvoie un objet Shape qui représente la nouvelle étiquette.

Syntaxe

expression. AddLabel (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 dans l'étiquette.
Left Obligatoire Unique Position (en points) du coin supérieur gauche de l’étiquette par rapport au coin supérieur gauche du document.
Top Obligatoire Unique Position (en points) du coin supérieur gauche de l’étiquette par rapport au haut du document.
Width Obligatoire Simple Largeur de l'étiquette, en points.
Height Obligatoire Simple Hauteur de l'étiquette, en points.

Valeur renvoyée

Forme

Exemple

Cet exemple montre comment ajouter à myDocument une étiquette verticale contenant le texte Étiquette de test.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddLabel(msoTextOrientationVertical, _ 
    100, 100, 60, 150) _ 
    .TextFrame.Characters.Text = "Test Label"

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.