Cell.GlueTo, méthode (Visio)
Colle une forme à une autre en associant une cellule de l'une à une cellule de l'autre.
Syntaxe
expression. GlueTo (CellObject)
Expression Variable qui représente un objet Cell .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
CellObject | Requis | [IVCELL] | Expression qui renvoie un objet Cell représentant la partie de la forme à coller. |
Valeur renvoyée
Aucune
Remarques
Vous trouverez ci-après la liste des connexions possibles.
Vous trouverez ci-après la liste des connexions possibles.
De la cellule de début ou de fin d’une forme 1D à...
Une cellule d'un point de connexion.
Cellule d’un repère ou d’un point de repère : Lorsque la cellule de début ou de fin d’une forme 1D est collée à une cellule d’un repère ou d’un point de repère, deux connexions sont créées : une de la cellule BeginX ou EndX à la cellule Angle du repère, et une de la cellule BeginY ou EndY à la cellule Angle du repère.
Broche d’une forme 2D (crée un collage dynamique) : La forme collée à partir de doit être routable (ObjType inclut visLOFlagsRoutable) ou avoir un type de collage dynamique (GlueType inclut visGlueTypeWalking) et n’interdit pas le collage dynamique (GlueType n’inclut pas visGlueTypeNoWalking). Le collage vers PinX crée une colle dynamique avec une préférence de marche horizontale et le collage à PinY crée une colle dynamique avec une préférence de marche verticale.
N’importe quelle cellule d’une ligne de vertex dans une section Geometry : Un point de connexion est créé et collé à. La cellule de début ou de fin peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
Cellule de début ou de fin d’une forme 1D : Un point de connexion est créé et collé à. La cellule de début ou de fin peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
Bord (cellule de la section Alignement) d’une forme 2D : Un point de connexion est créé et collé à. La cellule de début ou de fin peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
À partir du bord (cellule de la section Alignement) d’une forme 2D vers une cellule d’un repère ou d’un point de repère.
D’une cellule de point de connexion vers l’extérieur ou vers l’intérieur/l’extérieur d’une forme 1D vers une cellule de point de connexion vers l’intérieur ou l’intérieur/l’extérieur qui n’est pas une cellule d’un point de repère ou de repère : Lorsque ces cellules sont collées, deux connexions sont créées : l’une de la cellule BeginX de la forme 1D à la cellule Connections.Xi et l’autre de la cellule EndX de la forme 1D à la cellule Connections.Y i .
D’une cellule de point de connexion vers l’extérieur ou vers l’intérieur/l’extérieur d’une forme 2D vers une cellule de point de connexion de type vers l’intérieur ou l’intérieur/vers l’extérieur qui n’est pas une cellule d’un repère ou d’un point de repère : Si le point de connexion vers l’extérieur a une direction, deux points de connexion sont créés : un de la cellule Angle à la cellule Connections.X i et l’autre de la cellule PinX à la cellule Connections.Y i .
D'une cellule de point de contrôle vers...
Une cellule d'un point de connexion.
Une cellule d'un repère ou d'un point de repère : lorsqu'un point de contrôle est collé à une cellule d'un repère ou d'un point de repère autre qu'une cellule de point de connexion, deux connexions sont créées — l'une vers l'AxeX du repère et l'autre vers l'AxeY du repère.
N’importe quelle cellule d’une ligne de vertex dans une section Geometry : Un point de connexion est créé et collé à. N’importe quelle cellule de la ligne de point de contrôle peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
Cellule de début ou de fin d’une forme 1D qui n’est pas un repère ou un point de repère : Un point de connexion est créé et collé à. N’importe quelle cellule de la ligne de point de contrôle peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
Bord (cellule de la section Alignement) d’une forme 2D : Un point de connexion est créé et collé à. N’importe quelle cellule de la ligne de point de contrôle peut être désignée comme cellule à partir de laquelle coller. La méthode GlueTo établit de nouvelles formules dans les cellules X et Y de la ligne de connexion.
Pour plus d'informations sur les types de point de connexion et la direction, reportez-vous à la section relative aux points de connexion.
Exemple
La macro suivante indique comment utiliser la méthode GlueTo pour coller des formes ensemble.
Public Sub GlueTo_Example()
Dim vso1DShape As Visio.Shape
Dim vso2DShape1 As Visio.Shape
Dim vso2DShape2 As Visio.Shape
Dim vsoCellGlueFromBegin As Visio.Cell
Dim vsoCellGlueFromEnd As Visio.Cell
Dim vsoCellGlueToObject As Visio.Cell
Dim vsoCellGlueToObject2 As Visio.Cell
'Draw a line.
Set vso1DShape = ActivePage.DrawLine(3, 5, 5, 3)
'Draw the lower rectangle.
Set vso2DShape1 = ActivePage.DrawRectangle(1, 1, 4, 2)
'Draw the upper rectangle.
Set vso2DShape2 = ActivePage.DrawRectangle(5, 5, 8, 6)
'Get the Cell objects needed to make the connections.
Set vsoCellGlueFromBegin = vso1DShape.Cells("BeginX")
Set vsoCellGlueFromEnd = vso1DShape.Cells("EndX")
Set vsoCellGlueToObject = vso2DShape1.Cells("Geometry1.X3")
Set vsoCellGlueToObject2 = vso2DShape2.Cells("Geometry1.X1")
'Use the GlueTo method to glue the begin point of the 1D shape
'to the top right vertex (Geometry1.X3) of the lower 2D shape.
vsoCellGlueFromBegin.GlueTo vsoCellGlueToObject
'Use the GlueTo method to glue the endpoint of the 1D shape
'to the bottom left vertex (Geometry1.X1) of the upper 2D shape.
vsoCellGlueFromEnd.GlueTo vsoCellGlueToObject2
'You can also use the GlueTo method to glue
'by referencing a connection point cell.
Set vso1DShape = ActivePage.DrawLine(3, 5, 5, 3)
Set vsoCellGlueFromEnd = vso1DShape.Cells("EndX")
Set vsoCellGlueToObject = vso2DShape1.Cells("Connections.X1")
vsoCellGlueFromEnd.GlueTo vsoCellGlueToObject
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.