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
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 ». Le code ajoute un rectangle et un connecteur dans la première diapositive. Le début du nouveau connecteur est attaché au même point de connexion que le début du connecteur « Conn1To2 », et la fin du nouveau connecteur est attachée au point de connexion un du 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
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.