Partager via


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

CanvasShapes, Collection

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.