Propriété ConnectorFormat.EndConnectionSite (PowerPoint)

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

Syntaxe

expression. EndConnectionSite

expression Variable qui représente un objet ConnectorFormat .

Valeur renvoyée

Entier long

Remarques

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

Exemple

Dans cet exemple, on suppose que la première diapositive de la présentation active contient déjà deux formes attachées par un connecteur nommé « Conn1To2 ». L’exemple montre comment ajouter un rectangle et un connecteur dans la première diapositive. La fin du nouveau connecteur est attachée au même point de connexion que la fin du connecteur « Conn1To2 », et le début du nouveau connecteur est attaché au point de connexion un du nouveau rectangle.

Set myDocument = ActivePresentation.Slides(1)

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

    With .Item("Conn1To3").ConnectorFormat
        .BeginConnect r3, 1
        .EndConnect endConnShape1, endConnSite1
    End With
End With

Voir aussi

ConnectorFormat, objet

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.