AllReports-Objekt (Access)
Die AllReports-Auflistung enthält ein AccessObject für jeden Bericht im CurrentProject - oder CodeProject-Objekt .
Hinweise
Das CurrentProject - oder CodeProject-Objekt verfügt über eine AllReports-Auflistung , die AccessObject-Objekte enthält, die Instanzen aller Berichte in der Datenbank beschreiben. Beispielsweise können Sie die AllReports-Auflistung in Visual Basic aufzählen, um die Werte der Eigenschaften einzelner AccessObject-Objekte in der Auflistung festzulegen oder zurückzugeben.
Verweisen Sie auf ein einzelnes AccessObject-Objekt in der AllReports-Auflistung , indem Sie entweder anhand des Namens auf das Element verweisen oder auf seinen Index innerhalb der Auflistung verweisen. Wenn Sie auf einen bestimmten Bericht in der AllReports-Auflistung verweisen möchten, ist es besser, auf den Bericht anhand des Namens zu verweisen, da sich der Index ändern kann.
Die AllReports-Auflistung wird beginnend mit 0 indiziert. Wenn Sie auf einen Bericht über seinen Index verweisen, ist AllReports(0) der erste Bericht, AllReports(1) der zweite Bericht usw.
Hinweis
Verwenden Sie zum Auflisten aller geöffneten Berichte in der Datenbank die IsLoaded-Eigenschaft jedes AccessObject-Objekts in der AllReports-Auflistung . Sie können dann die Name-Eigenschaft jedes einzelnen AccessObject-Objekts verwenden, um den Namen eines Berichts zurückzugeben.
Es ist nicht möglich, der AllReports-Auflistung ein AccessObject-Objekt hinzuzufügen oder aus ihr zu löschen.
Beispiel
Im folgenden Beispiel wird der Name jedes geöffneten AccessObject-Objekts in der AllReports-Auflistung ausgegeben.
Sub AllReports()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
' Search for open AccessObject objects in AllReports collection.
For Each obj In dbs.AllReports
If obj.IsLoaded = True Then
' Print name of obj.
Debug.Print obj.Name
End If
Next obj
End Sub
Eigenschaften
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.