Partager via


Propriété ConnectorFormat.EndConnectionSite (Excel)

Cette propriété renvoie un nombre entier qui spécifie le point d’attache auquel la fin d’un connecteur est connectée. Long (en lecture seule).

Syntaxe

expression. EndConnectionSite

Expression Variable qui représente un objet ConnectorFormat .

Remarques

Si la fin du connecteur spécifié n’est pas attachée à une forme, cette propriété produit une erreur.

Exemple

Cet exemple suppose que myDocument contient déjà deux formes attachées par un connecteur nommé Conn1To2. Le code montre comment ajouter un rectangle et un connecteur à myDocument. La fin de ce nouveau connecteur sera reliée au même point de connexion que la fin du connecteur baptisé Conn1To2, et le début du nouveau connecteur sera relié au point de connexion du nouveau rectangle.

Set myDocument = Worksheets(1) 
With myDocument.Shapes 
 Set r3 = .AddShape(msoShapeRectangle, _ 
 100, 420, 200, 100) 
 With .Item("Conn1To2").ConnectorFormat 
 endConnSite1 = .EndConnectionSite 
 Set endConnShape1 = .EndConnectedShape 
 End With 
 With .AddConnector(msoConnectorCurve, _ 
 0, 0, 10, 10).ConnectorFormat 
 .BeginConnect r3, 1 
 .EndConnect endConnShape1, endConnSite1 
 End With 
End With

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.