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 ligne à la collection Shapes spécifiée.
Syntaxe
expression. AddLine (BeginX, Beginy, EndX, EndY)
expression Variable qui représente un objet Shapes.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| BeginX | Obligatoire | Variant | Coordonnée x du point de départ de la ligne. |
| BeginY | Obligatoire | Variant | Coordonnée y du point de départ de la ligne. |
| EndX | Obligatoire | Variant | Coordonnée x du point de fin de la ligne. |
| EndY | Obligatoire | Variant | Coordonnée y du point de fin de la ligne. |
Valeur renvoyée
Shape
Remarques
Pour les arguments BeginX, BeginY, EndX et EndY , 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 nouvelle ligne à la première page de la composition active.
Dim shpLine As Shape
Set shpLine = ActiveDocument.Pages(1).Shapes.AddLine _
(BeginX:=144, BeginY:=144, _
EndX:=180, EndY:=72)
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.