AllQueries-Objekt (Access)
Die AllQueries-Auflistung enthält ein AccessObject für jede Abfrage im CurrentData - oder CodeData-Objekt .
Hinweise
Das CurrentData- oder CodeData-Objekt verfügt über eine AllQueries-Auflistung , die AccessObject-Objekte enthält, die Instanzen aller abfragen beschreiben, die von CurrentData oder CodeData angegeben werden. Beispielsweise können Sie die AllQueries-Auflistung in Visual Basic auflisten, um die Werte der Eigenschaften einzelner AccessObject-Objekte in der Auflistung festzulegen oder zurückzugeben.
Verweisen Sie auf ein einzelnes AccessObject-Objekt in der AllQueries-Auflistung , indem Sie entweder anhand des Namens auf das Objekt verweisen oder auf seinen Index innerhalb der Auflistung verweisen. Wenn Sie auf eine bestimmte Abfrage in der AllQueries-Auflistung verweisen möchten, empfiehlt sich die Verwendung des Namens, da der Index sich ändern kann.
Die AllQueries-Auflistung wird beginnend mit 0 indiziert. Wenn Sie auf eine Abfrage über ihren Index verweisen, ist AllQueries(0) die erste Abfrage, AllQueries(1) die zweite Abfrage usw.
Hinweis
Um alle geöffneten Abfragen in der Datenbank aufzulisten, verwenden Sie die IsLoaded-Eigenschaft jedes AccessObject-Objekts in der AllQueries-Auflistung . Sie können dann die Name-Eigenschaft jedes einzelnen AccessObject-Objekts verwenden, um den Namen einer Abfrage zurückzugeben.
Es ist nicht möglich, der AllQueries-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 AllQueries-Auflistung ausgegeben.
Sub AllQueries()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
' Search for open AccessObject objects in AllQueries collection.
For Each obj In dbs.AllQueries
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.