Méthode ShapeRange.RerouteConnections (PowerPoint)

Redirige les connecteurs afin qu'ils prennent le chemin le plus court possible entre les formes qu'ils se connectent. Pour ce faire, utilisez la méthode RerouteConnections peut détacher les extrémités d'un connecteur et les rattacher à différents points de connexion sur les formes connectées.

Syntaxe

expression. RerouteConnections

Expression Variable qui représente un objet ShapeRange .

Remarques

Cette méthode redirige tous les connecteurs attachés à la forme spécifiée ; si la forme spécifiée est un connecteur, celui-ci est redirigé.

Si cette méthode est appliquée à un connecteur, seul ce connecteur sera redirigé. Si cette méthode est appliquée à une forme connectée, tous les connecteurs de cette forme seront redirigés.

Exemple

Cet exemple ajoute deux rectangles à myDocument, les relie avec un connecteur en arc, puis redirige le connecteur afin qu’il prenne le chemin le plus court entre les deux rectangles. Remarquez que la méthode RerouteConnections définit la taille et la position du connecteur et détermine les sites auxquels il se connecte, de sorte que les valeurs que vous spécifiez initialement pour les arguments ConnectionSite utilisés avec les méthodes BeginConnect et EndConnect ne sont pas nécessaires.

Set myDocument = ActivePresentation.Slides(1)

Set s = myDocument.Shapes

Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100)
Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100)
Set newConnector = s _
    .AddConnector(msoConnectorCurve, 0, 0, 100, 100)

With newConnector.ConnectorFormat
    .BeginConnect firstRect, 1
    .EndConnect secondRect, 1
End With

newConnector.RerouteConnections

Voir aussi

ShapeRange, 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.