перечислять запросы в листах книги Excel

Question

Мне нужен макрос vba для перечисления запросов на каждом листе рабочей книги.

Можете ли вы предоставить пример кода?

Джерри E

Answer 1

Вот, пожалуйста:

Dim aSheet As Worksheet
For Each aSheet In Worksheets

    Dim aQueryTable As QueryTable

    For Each aQueryTable In aSheet.QueryTables

      ' Do something with aQueryTable, e.g.
        MsgBox aQueryTable.Name

    Next aQueryTable

Next aSheet