Propiedad OLEObjects.Count (Visio)
Devuelve el número de objetos de una colección. Solo lectura.
Sintaxis
expresión. Contar
Expresión Variable que representa un objeto OLEObjects .
Valor devuelto
Long
Ejemplo:
En esta macro de Microsoft Visual Basic para Aplicaciones (VBA) se muestra cómo usar la propiedad Count para recorrer en iteración una colección Documents. Se muestran los nombres de todos los documentos de Microsoft Visio abiertos en la ventana Inmediato.
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
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.