TextStyles.Count-Eigenschaft (Publisher)

Gibt einen Long-Wert zurück, der die Anzahl der Elemente in der angegebenen Auflistung darstellt.

Syntax

Ausdruck. Count

Ausdruck Eine Variable, die ein TextStyles-Objekt darstellt.

Beispiel

In dem folgenden Beispiel wird die Anzahl der Seiten im aktiven Dokument angezeigt.

Sub CountNumberOfPages() 
 MsgBox "Your publication contains " & _ 
 ActiveDocument.Pages.Count & " page(s)." 
End Sub

In dem folgenden Beispiel wird die Anzahl der Formen im aktiven Dokument angezeigt.

Sub CountNumberOfShapes() 
 Dim intShapes As Integer 
 Dim pg As Page 
 
 For Each pg In ActiveDocument.Pages 
 intShapes = intShapes + pg.Shapes.Count 
 Next 
 
 MsgBox "Your publication contains " & intShapes & " shape(s)." 
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.