Propriedade Connects.FromSheet (Visio)

Retorna a forma a partir da qual uma ou mais conexões são originárias. Somente leitura.

Sintaxe

expressão. FromSheet

Expressão Uma variável que representa um objeto Connects .

Valor de retorno

Forma

Comentários

A propriedade FromSheet de um objeto Connect é bastante simples. Ela sempre retorna a forma cujo objeto Connect é originário.

Uma coleção Connects representa várias conexões. Se todas as conexões representadas pela coleção forem originárias da mesma forma, a propriedade FromSheet da coleção retornará essa forma. Caso contrário, a propriedade FromSheet retornará Nothing e não criará uma exceção.

Exemplo

Esta macro do VBA (Microsoft Visual Basic for Applications) mostra como usar a propriedade FromSheet para localizar uma forma da qual o objeto Connect é originário, em um desenho do Microsoft Visio. O exemplo exibe as informações da conexão na janela Immediate.

O exemplo presume que haja um documento ativo contendo pelo menos duas formas conectadas. Para obter melhores resultados, conecte duas formas do estêncil Formas de Organograma.

 
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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.