Propriété ConnectorFormat.EndConnectedShape (PowerPoint)
Renvoie un objet Shape qui représente la forme à laquelle la fin du connecteur spécifié est attachée. En lecture seule.
Syntaxe
expression. EndConnectedShape
Expression Variable qui représente un objet ConnectorFormat .
Valeur renvoyée
Shape
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 la diapositive de poing 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. La fin du nouveau connecteur sera rattachée au même point d'attache que la fin du connecteur appelé « Conn1To2 » et le début du nouveau connecteur sera rattaché au point d'attache 1 sur le 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
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