Propriedade Layers.Count (Visio)
Retorna o número de objetos de uma coleção. Somente leitura.
Sintaxe
expressão. Contar
Expressão Uma variável que representa um objeto Layers .
Valor de retorno
Inteiro
Exemplo
Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como usar a propriedade Count para fazer a iteração por meio de uma coleção Documents. Ela exibe os nomes de todos os documentos abertos do Microsoft Visio na janela Imediato.
Public Sub Count_Example()
Dim intCounter As Integer
Dim vsoDocument As Visio.Document
For intCounter = 1 To Documents.Count
'Get the next open document.
Set vsoDocument = Documents.Item(intCounter)
'Print its name in the Immediate window.
Debug.Print vsoDocument.Name
Next intCounter
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.