Объект QueryTables (Excel)

Коллекция объектов QueryTable .

Замечания

Каждый объект QueryTable представляет таблицу листа, созданную на основе данных, возвращаемых из внешнего источника данных.

Пример

Используйте свойство QueryTables объекта Worksheet , чтобы вернуть коллекцию QueryTables .

В следующем примере показано количество таблиц запросов на активном листе.

MsgBox ActiveSheet.QueryTables.Count

Используйте метод Add , чтобы создать таблицу запросов и добавить ее в коллекцию QueryTables . В следующем примере создается новая таблица запросов.

Dim qt As QueryTable 
sqlstring = "select 96Sales.totals from 96Sales where profit < 5" 
connstring = _ 
 "ODBC;DSN=96SalesData;UID=Rep21;PWD=NUyHwYQI;Database=96Sales" 
With ActiveSheet.QueryTables.Add(Connection:=connstring, _ 
 Destination:=Range("B1"), Sql:=sqlstring) 
 .Refresh 
End With

Методы

• Add
• Элемент

Свойства

• Приложение
• Count
• Creator
• Parent

См. также

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

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

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