Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
La colección AllTables contiene un objeto AccessObject para cada tabla en el objeto CurrentData o CodeData objeto.
Observaciones
El objeto CurrentData o CodeData tiene una colección AllTables que contiene objetos AccessObject que describen instancias de todas las tablas especificadas mediante CurrentData o CodeData. Por ejemplo, puede enumerar la colección AllTables 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 AllTables 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 AllTables, es más conveniente hacer referencia a la tabla por su nombre, dado que puede cambiar el índice de la colección de una tabla.
La colección AllTables se indiza a partir de cero. Si hace referencia a una tabla por su índice, la primera tabla es AllTables(0), la segunda es AllTables (1) y así sucesivamente.
Nota:
[!NOTA] Para mostrar todas las tablas abiertas en la base de datos, utilice el IsLoaded propiedad de cada objeto AccessObject de la colección AllTables. A continuación, puede utilizar el nombre propiedad de cada objeto AccessObject determinado para devolver el nombre de una tabla.
No puede agregar ni eliminar un objeto AccessObject de la colección AllTables.
Ejemplo
En el ejemplo siguiente se imprime el nombre de cada objeto AccessObject abierto en la colección AllTables.
Sub AllTables()
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentData
' Search for open AccessObject objects in AllTables collection.
For Each obj In dbs.AllTables
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.