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.