Objet AllQueries (Access)
La collection AllQueries contient un objet AccessObject pour chaque requête dans l'objet CurrentData ou CodeData.
L'objet CurrentData ou CodeData possède une collection AllQueries contenant des objets AccessObject qui décrivent des instances de toutes les requêtes spécifiées par l'objet CurrentData ou CodeData. Par exemple, vous pouvez énumérer la collection AllQueries dans Visual Basic pour définir ou renvoyer les valeurs des propriétés des objets AccessObject individuels dans la collection.
Faites référence à un objet AccessObject individuel dans la collection AllQueries en faisant référence à l’objet par son nom ou en faisant référence à son index dans la collection. Si vous souhaitez faire référence à un objet spécifique dans la collection AllQueries, il est préférable de faire référence à la requête par son nom car l'index de la collection d'une requête peut changer.
La collection AllQueries est indexée à partir de zéro. Si vous faites référence à une requête par son index, la première requête est AllQueries(0), la deuxième requête est AllQueries (1) et ainsi de suite.
Notes
Pour répertorier toutes les requêtes ouvertes dans la base de données, utilisez la propriété IsLoaded de chaque objet AccessObject de la collection AllQueries . Vous pouvez ensuite utiliser la propriété Name de chaque objet AccessObject individuel pour renvoyer le nom d’une requête.
Vous ne pouvez ni ajouter, ni supprimer un objet AccessObject dans la collection AllQueries.
L'exemple suivant imprime le nom de chaque objet AccessObject ouvert dans la collection AllQueries.
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
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.