Remarque
L’accès à cette page requiert une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page requiert une autorisation. Vous pouvez essayer de modifier des répertoires.
Crée une ligne. Renvoie un objet Shape qui représente la nouvelle ligne.
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 | Unique | Position horizontale, exprimée en points, du début de la ligne par rapport au bord gauche de la diapositive. |
| BeginY | Obligatoire | Unique | Position verticale, exprimée en points, du début de la ligne par rapport au bord supérieur de la diapositive. |
| EndX | Obligatoire | Unique | Position horizontale, exprimée en points, de la fin de la ligne par rapport au bord gauche de la diapositive. |
| EndY | Obligatoire | Unique | Position verticale, exprimée en points, de la fin de la ligne par rapport au bord supérieur de la diapositive. |
Valeur renvoyée
Shape
Exemple
Cet exemple ajoute un trait bleu en pointillé dans myDocument.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(BeginX:=10, BeginY:=10, _
EndX:=250, EndY:=250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
End With
Voir aussi
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.