Compartir a través de


Propiedad Connect.ToSheet (Visio)

Devuelve la forma con la que se realizan una o varias conexiones. Solo lectura.

Sintaxis

expresión. ToSheet

Expresión Variable que representa un objeto Connect .

Valor devuelto

Forma

Comentarios

La propiedad ToSheet de un objeto Connect siempre devuelve la forma con la que se realiza la conexión.

La colección Connects representa varias conexiones. Si todas las conexiones representadas por la colección se realizan con la misma forma, la propiedad ToSheet devolverá esa forma. De lo contrario, devolverá Nothing y no generará ninguna excepción.

Ejemplo:

En esta macro de Microsoft Visual Basic para Aplicaciones (VBA) se muestra cómo usar la propiedad ToSheet para buscar la forma a partir de la cual se origina un objeto Connect de un dibujo de Microsoft Visio. El ejemplo muestra la información sobre las conexiones en la ventana Inmediato.

En este ejemplo se da por hecho que existe un documento activo que contiene al menos dos formas conectadas. Para obtener los mejores resultados, conecte dos formas de la galería de símbolos Formas para organigramas.

 
Public Sub ToSheet_Example() 
 
 Dim vsoShapes As Visio.Shapes 
 Dim vsoShape As Visio.Shape 
 Dim vsoConnectTo As Visio.Shape 
 Dim vsoConnects As Visio.Connects 
 Dim vsoConnect As Visio.Connect 
 Dim intCurrentShapeIndex As Integer 
 Dim intCounter As Integer 
 Set vsoShapes = ActivePage.Shapes 
 
 'For each shape on the page, get its connections. 
 For intCurrentShapeIndex = 1 To vsoShapes.Count 
 
 Set vsoShape = vsoShapes(intCurrentShapeIndex) 
 Set vsoConnects = vsoShape.Connects 
 
 'For each connection, get the shape it connects to. 
 For intCounter = 1 To vsoConnects.Count 
 
 Set vsoConnect = vsoConnects(intCounter) 
 Set vsoConnectTo = vsoConnect.ToSheet 
 
 'Print the name of the shape the 
 'Connect object connects to. 
 Debug.Print vsoConnectTo.Name 
 
 Next intCounter 
 
 Next intCurrentShapeIndex 
 
End Sub

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.