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 étiquette de texte à la collection Shapes spécifiée.
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 | Requis | PbTextOrientation | Orientation de l'étiquette. Il peut s’agir de l’une des constantes PbTextOrientation . |
| Left | Obligatoire | Variant | Position du bord gauche de la forme représentant l'étiquette. |
| Top | Obligatoire | Variant | Position du bord supérieur de la forme représentant l'étiquette. |
| Width | Obligatoire | Variant | Largeur de la forme représentant l'étiquette. |
| Height | Obligatoire | Variant | Hauteur de la forme représentant l'étiquette. |
Valeur renvoyée
Shape
Remarques
Pour les arguments 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 »).
Exemple
L’exemple ci-après ajoute une étiquette horizontale à la première page de la composition active.
Dim shpLabel As Shape
Set shpLabel = ActiveDocument.Pages(1).Shapes.AddLabel _
(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.