Compartir a través de

Objeto ConnectorFormat (Excel)

  • Artículo

Contiene propiedades y métodos aplicables a conectores.

Comentarios

Un conector es una línea que une dos formas por unos puntos denominados sitios de conexión. Si se reorganizan las formas que están conectadas, la geometría del conector se ajusta automáticamente para que las formas permanezcan conectadas.

Los sitios de conexión generalmente se numeran de acuerdo con las reglas que se indican en la siguiente tabla.

Tipo de forma Esquema de numeración del sitio de conexión
Autoformas, WordArt, imágenes y objetos OLE La numeración de los lugares de conexión comienza desde arriba y continúa en sentido contrario a las agujas del reloj.
Formas libres Los lugares de conexión son los vértices y se corresponden con los números de vértice.

Utilice la propiedad ConnectorFormat del objeto Shape para devolver un objeto ConnectorFormat . Utilice los métodos BeginConnect y EndConnect para unir el final del conector a otras formas del documento. Use el método RerouteConnections del objeto Shape para encontrar automáticamente la ruta de acceso más corta entre las dos formas conectadas por el conector. Use la propiedad Connector para ver si una forma es un conector.

Nota:

Se asigna un tamaño y una posición al agregar un conector a la colección Shapes , pero el tamaño y la posición se ajustan automáticamente al adjuntar el principio y el final del conector a otras formas de la colección. Por lo tanto, si tiene previsto adjuntar un conector a otras formas, el tamaño inicial y la posición que especifique no son pertinentes.

Del mismo modo, se especifican los sitios de conexión de una forma a unir el conector cuando lo, pero utiliza el método RerouteConnections después el conector puede cambiar los sitios de conexión se une el conector, haciendo que su opción original de los sitios de conexión sea irrelevante.

Ejemplo:

Para saber los números que corresponden a los lugares de conexión de una forma compleja, experimente con la forma después de activar la grabadora de macros y examine el código grabado; o también puede crear una forma, seleccionarla y después ejecutar el siguiente ejemplo. El código numera cada lugar de conexión y lo asocia a un conector.

Set mainshape = ActiveWindow.Selection.ShapeRange(1) 
With mainshape 
 bx = .Left + .Width + 50 
 by = .Top + .Height + 50 
End With 
With ActiveSheet 
 For j = 1 To mainshape.ConnectionSiteCount 
 With .Shapes.AddConnector(msoConnectorStraight, _ 
 bx, by, bx + 50, by + 50) 
 .ConnectorFormat.EndConnect mainshape, j 
 .ConnectorFormat.Type = msoConnectorElbow 
 .Line.ForeColor.RGB = RGB(255, 0, 0) 
 l = .Left 
 t = .Top 
 End With 
 With .Shapes.AddTextbox(msoTextOrientationHorizontal, _ 
 l, t, 36, 14) 
 .Fill.Visible = False 
 .Line.Visible = False 
 .TextFrame.Characters.Text = j 
 End With 
 Next j 
End With

En el siguiente ejemplo se agregan dos rectángulos a myDocument y se conectan con un conector curvado.

Set myDocument = Worksheets(1) 
Set s = myDocument.Shapes 
Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100) 
Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100) 
Set c = s.AddConnector(msoConnectorCurve, 0, 0, 0, 0) 
With c.ConnectorFormat 
 .BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1 
 .EndConnect ConnectedShape:=secondRect, ConnectionSite:=1 
 c.RerouteConnections 
End With

Métodos

Propiedades

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.