Fonts.Count-Eigenschaft (Visio)

Gibt die Anzahl an Objekten in einer Auflistung zurück. Schreibgeschützt.

Syntax

Ausdruck. Count

Ausdruck Eine Variable, die ein Fonts-Objekt darstellt.

Rückgabewert

Ganzzahl

Beispiel

Das folgende VBA-Makro (Microsoft Visual Basic für Applikationen) zeigt, wie die Count-Eigenschaft zum Durchlaufen einer Documents-Auflistung verwendet werden kann. Es zeigt die Namen aller geöffneten Microsoft Visio-Dokumente im Direktfenster an.

 
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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.