Compartir a través de

Propiedad Connect.FromSheet (Visio)

  • Artículo

Devuelve la forma desde la que se originan una o varias conexiones. Solo lectura.

Sintaxis

expresión. FromSheet

Expresión Variable que representa un objeto Connect .

Valor devuelto

Forma

Comentarios

La propiedad FromSheet de un objeto Connect es sencilla. Siempre devuelve la forma a partir de la cual se origina el objeto Connect.

Una colección Connects representa varias conexiones. Si todas las conexiones representadas por la colección se originan en la misma forma, la propiedad FromSheet de la colección devolverá esa forma. De lo contrario, la propiedad FromSheet 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 FromSheet 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 FromSheet_Example() 
 
 Dim vsoShapes As Visio.Shapes 
 Dim vsoShape As Visio.Shape 
 Dim vsoConnectFrom 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 intCurrentShapeIndex = 1 To vsoShapes.Count 
 Set vsoShape = vsoShapes(intCurrentShapeIndex) 
 Set vsoConnects = vsoShape.Connects 
 
 For intCounter = 1 To vsoConnects.Count 
 Set vsoConnect = vsoConnects(intCounter) 
 Set vsoConnectFrom = vsoConnect.FromSheet 
 
 'Print the name of the shape the 
 'Connect object originates from. 
 Debug.Print vsoConnectFrom.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.