Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Relie au moins deux formes sélectionnées avec un lien dynamique. Renvoie la valeur Nothing.
Syntaxe
expression. ConnectShapes
expression Variable qui représente un objet Selection .
Valeur renvoyée
Aucune
Exemple
Cette macro Microsoft Visual Basic pour Applications (VBA) indique comment utiliser la méthode ConnectShapes pour relier deux formes.
Public Sub ConnectShapes_Example()
Dim vsoShape1 As Visio.Shape
Dim vsoShape2 As Visio.Shape
Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(2, 9, 4, 7)
Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(5, 6, 7, 3)
ActiveWindow.DeselectAll
ActiveWindow.Select vsoShape1, visSelect
ActiveWindow.Select vsoShape2, visSelect
Application.ActiveWindow.Selection.ConnectShapes
End Sub
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.