Objeto QueryTables (Excel)

Uma coleção de objetos QueryTable.

Comentários

Cada objeto QueryTable representa uma tabela de planilha construída com base em dados retornados de uma fonte de dados externa.

Exemplo

Use a propriedade QueryTables do objeto Worksheet para retornar a coleção QueryTables.

O exemplo a seguir exibe o número de tabelas de consulta na planilha ativa.

MsgBox ActiveSheet.QueryTables.Count

Use o método Add para criar uma nova tabela de consulta e adicioná-la à coleção QueryTables. O exemplo a seguir cria uma nova tabela de consulta.

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

Métodos

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.