CanvasShapes.AddConnector, méthode (Word)
Renvoie un objet Shape qui représente un connecteur reliant deux formes dans une zone de dessin.
Syntaxe
expression. AddConnector (Type, BeginX, Beginy, EndX, EndY)
expression Obligatoire. Variable qui représente un objet CanvasShapes .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Type | Obligatoire | MsoConnectorType | Type de connecteur. |
BeginX | Obligatoire | Single | Emplacement horizontal qui marque le début du connecteur. |
BeginY | Obligatoire | Single | Emplacement vertical qui marque le début du connecteur. |
EndX | Obligatoire | Single | Emplacement horizontal qui marque la fin du connecteur. |
EndY | Obligatoire | Single | Emplacement vertical qui marque la fin du connecteur. |
Exemple
L'exemple suivant montre comment ajouter un connecteur droit à une nouvelle zone de dessin d'un nouveau document.
Sub AddCanvasConnector()
Dim docNew As Document
Dim shpCanvas As Shape
Set docNew = Documents.Add
'Add drawing canvas to new document
Set shpCanvas = docNew.Shapes.AddCanvas( _
Left:=150, Top:=150, Width:=200, Height:=300)
'Add connector to the drawing canvas
shpCanvas.CanvasItems.AddConnector _
Type:=msoConnectorStraight, BeginX:=150, _
BeginY:=150, EndX:=200, EndY:=200
End Sub
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.