Objeto AllQueries (Access)
La colección AllQueries contiene un objeto AccessObject para cada consulta del objeto CurrentData o CodeData.
Comentarios
El objeto CurrentData o CodeData tiene una colección AllQueries compuesta que contiene objetos AccessObject que describen instancias de todas las consultas especificadas mediante CurrentData o CodeData. Por ejemplo, puede enumerar la colección AllQueries en Visual Basic para establecer o devolver los valores de las propiedades de objetos AccessObject determinados de la colección.
Haga referencia a un objeto AccessObject individual de la colección AllQueries haciendo referencia al objeto por nombre o haciendo referencia a su índice dentro de la colección. Si desea hacer referencia a un objeto específico de la colección AllQueries, es más conveniente hacer referencia a la consulta por su nombre, dado que puede cambiar el índice de la colección de una consulta.
La colección AllQueries se indiza a partir de cero. Si hace referencia a una consulta por su índice, la primera consulta es AllQueries(0), la segunda consulta es AllQueries (1) y así sucesivamente.
Nota:
Para enumerar todas las consultas abiertas en la base de datos, use la propiedad IsLoaded de cada objeto AccessObject de la colección AllQueries . A continuación, puede usar la propiedad Name de cada objeto AccessObject individual para devolver el nombre de una consulta.
Los objetos AccessObject no se pueden agregar ni eliminar de la colección AllQueries.
Ejemplo:
En el ejemplo siguiente se imprime el nombre de cada objeto AccessObject abierto en la colección 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
Propiedades
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.