Объект AllTables (Access)

Коллекция AllTables содержит объект AccessObject для каждой таблицы в объекте CurrentData или CodeData .

Примечания

Объект CurrentData или CodeData содержит коллекцию AllTables , содержащую объекты AccessObject , которые описывают экземпляры всех таблиц, указанных в CurrentData или CodeData. Например, можно выполнить перечисление коллекции AllTables в Visual Basic, чтобы задать или вернуть значения свойств отдельных объектов AccessObject в коллекции.

Ссылайтесь на отдельный объект AccessObject в коллекции AllTables , либо ссылаясь на его имя или на его индекс в коллекции. Если вы хотите сослаться на определенный объект в коллекции AllTables , лучше ссылаться на таблицу по имени, так как индекс коллекции таблиц может измениться.

Коллекция AllTables индексируется, начиная с нуля. Если вы ссылаетесь на таблицу по ее индексу, первая таблица — AllTables(0), вторая таблица — AllTables(1) и т. д.

Примечание.

Чтобы получить список всех открытых таблиц в базе данных, используйте свойство IsLoaded каждого объекта AccessObject в коллекции AllTables . Затем можно использовать свойство Name каждого отдельного объекта AccessObject , чтобы вернуть имя таблицы.

Невозможно добавить или удалить объект AccessObject из коллекции AllTables .

Пример

В следующем примере выводится имя каждого открытого объекта AccessObject в коллекции 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

Свойства

• Application
• Count
• Item
• Parent

См. также

• Справочник по объектной модели Access

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.