It creates a query table object:
Dim WS As Worksheet
Dim QT As QueryTable
Dim QTCount As Long
For Each WS In ThisWorkbook.Worksheets
For Each QT In WS.QueryTables
Debug.Print QT.Parent, QT.CommandText
QTCount = QTCount + 1
Next
Next
MsgBox "There are " & QTCount & " query tables in this workbook."
NickHK
> Hi, when I import external data into excel using the Tools > Import
> External Data > .... function where does excel store this connection?
[quoted text clipped - 5 lines]
> Regards,
> jerm
jerm - 19 Jan 2007 15:41 GMT
thanks :)
jer
> It creates a query table object:
>
[quoted text clipped - 22 lines]
> > Regards,
> > jerm