Share via

QueryTables Object

  • Article
Excel Developer Reference

A collection of QueryTable objects.

Remarks

Each QueryTable object represents a worksheet table built from data returned from an external data source.

Example

Use the QueryTables property to return the QueryTables collection. The following example displays the number of query tables on the active worksheet.

Visual Basic for Applications 
  MsgBox ActiveSheet.QueryTables.Count

Use the Add method to create a new query table and add it to the QueryTables collection. The following example creates a new query table.

Visual Basic for Applications 
  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

See Also