close
Is there a way to list ALL existing queries within an Excel workbook?
One way for all names
on a new sheetgt;insertgt;namegt;pastegt;list
or
Sub QueryTableList()
Dim q As QueryTable
For Each sh In Worksheets
i = 3
For Each q In sh.QueryTables
'MsgBox q.Name
Cells(i, 1) = q.Name
i = i 1
Next q
Next sh
End Sub
--
Don Guillett
SalesAid Software
quot;sjp209quot; gt; wrote in message
...
gt; Is there a way to list ALL existing queries within an Excel workbook?
全站熱搜
留言列表
