Returns the QueryTables collection that represents all the query tables on the specified worksheet. Read-only.
For more information about returning a single object from a collection, see Returning an Object from a Collection.
Example
This example refreshes all query tables on worksheet one.
For Each qt in Worksheets(1).QueryTables
qt.Refresh
Next
This example sets query table one so that formulas to the right of it are automatically updated whenever it’s refreshed.
Sheets("sheet1").QueryTables(1).FillAdjacentFormulas = True