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
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour