Partager via


Shapes.AddLabel, méthode (PowerPoint)

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. 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 l’étiquette par rapport au bord gauche de la diapositive.
Top Obligatoire Unique Position, exprimée en points, du bord supérieur de l’étiquette par rapport au bord supérieur de la diapositive.
Width Obligatoire Unique Largeur de l’étiquette, exprimée en points.
Height Obligatoire Unique Hauteur de l’étiquette, exprimée en points.

Valeur renvoyée

Shape

Exemple

Cet exemple ajoute à myDocument une étiquette verticale qui contient le texte « Test Label ».

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddLabel(Orientation:=msoTextOrientationVerticalFarEast, _ 
    Left:=100, Top:=100, Width:=60, Height:=150).TextFrame _ 
    .TextRange.Text = "Test Label"

Voir aussi

Objet Shapes

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.