Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt eine Lists-Auflistung zurück, die alle formatierten Listen im angegebenen Dokument enthält. Schreibgeschützt.
Syntax
Ausdruck. Lists
Ausdruck Eine Variable, die ein Document-Objekt darstellt.
Hinweise
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter Vorgehensweise: Zurückgeben von Objekten aus Auflistungen.
Beispiel
In diesem Beispiel wird die Auswahl als nummerierte Liste formatiert. Anschließend wird in einem Meldungsfeld die Anzahl der Listen im aktiven Dokument angezeigt.
Selection.Range.ListFormat.ApplyListTemplate _
ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)
MsgBox "This document has " & ActiveDocument.Lists.Count _
& " lists."
In diesem Beispiel wird die dritte Liste im aktiven Dokument mit dem Standardformat für Aufzählungen formatiert. Wurde die Liste bereits als Aufzählung formatiert, wird die Formatierung entfernt.
If ActiveDocument.Lists.Count >= 3 Then
ActiveDocument.Lists(3).Range.ListFormat.ApplyBulletDefault
End If
In diesem Beispiel wird ein Meldungsfeld mit der Anzahl der Elemente aller Listen in MyLetter.doc angezeigt.
Set myDoc = Documents("MyLetter.doc")
i = myDoc.Lists.Count
For each li in myDoc.Lists
Msgbox "List " & i & " has " & li.CountNumberedItems _
& " items."
i = i - 1
Next li
Siehe auch
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.