Propriété ConnectorFormat.BeginConnectionSite (PowerPoint)

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

Syntaxe

expression. BeginConnectionSite

Expression Variable qui représente un objet ConnectorFormat .

Valeur renvoyée

Entier long

Remarques

Si le début du connecteur spécifié n’est pas relié à une forme, cette propriété génère une erreur.

Exemple

Cet exemple suppose que la première diapositive de la présentation active contient déjà deux formes attachées par un connecteur nommé « Conn1To2 ». Le code ajoute un rectangle et un connecteur à la première diapositive. Le début du nouveau connecteur sera rattaché au même point d'attache que le début du connecteur appelé « Conn1To2 » et la fin du nouveau connecteur sera rattachée au point d'attache 1 sur le nouveau rectangle.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes
    Set r3 = .AddShape(msoShapeRectangle, 450, 190, 200, 100)
    .AddConnector(msoConnectorCurve, _
        0, 0, 10, 10).Name = "Conn1To3"

    With .Item("Conn1To2").ConnectorFormat
        beginConnSite1 = .BeginConnectionSite
        Set beginConnShape1 = .BeginConnectedShape
    End With

    With .Item("Conn1To3").ConnectorFormat
        .BeginConnect beginConnShape1, beginConnSite1
        .EndConnect r3, 1
    End With
End With

Voir aussi

Objet ConnectorFormat

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.