Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автообновление запросов PowerQuery через VBA - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Автообновление запросов PowerQuery через VBA (Макросы/Sub)
Автообновление запросов PowerQuery через VBA
Невилл Дата: Понедельник, 24.02.2020, 13:33 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 79
Репутация: 2 ±
Замечаний: 0% ±

Excel 2007
Добрый день!

Есть файл с запросом PQ и парой макросов.
Суть: один макрос запускает обновление запросов и только ПОСЛЕ ИХ ЗАВЕРШЕНИЯ начинается выполнение второго макроса.

Потенциальная проблема вот с этим куском кода:
[vba]
Код
Sub RefreshQuery()
    Dim con As WorkbookConnection
    Dim Cname As String
    
    For Each con In ThisWorkbook.Connections
        Cname = con.Name
        With ThisWorkbook.Connections(Cname).OLEDBConnection
            .BackgroundQuery = False  'or true, up to you
            .Refresh
        End With
    Next
End Sub
[/vba]

У одного из коллег выпадает на строчке ".Refresh" с ошибкой 1004 "Application-defined or object-defined error". У остальных проблем не возникает никаких. Версия Excel у всех 2016.

Посоветуйте, пожалуйста, может есть, какой-то более надежный способ автообновления PQ через VBA? Важно, чтобы один макрос выпонялся только после обновления всех запросов.
 
Ответить
СообщениеДобрый день!

Есть файл с запросом PQ и парой макросов.
Суть: один макрос запускает обновление запросов и только ПОСЛЕ ИХ ЗАВЕРШЕНИЯ начинается выполнение второго макроса.

Потенциальная проблема вот с этим куском кода:
[vba]
Код
Sub RefreshQuery()
    Dim con As WorkbookConnection
    Dim Cname As String
    
    For Each con In ThisWorkbook.Connections
        Cname = con.Name
        With ThisWorkbook.Connections(Cname).OLEDBConnection
            .BackgroundQuery = False  'or true, up to you
            .Refresh
        End With
    Next
End Sub
[/vba]

У одного из коллег выпадает на строчке ".Refresh" с ошибкой 1004 "Application-defined or object-defined error". У остальных проблем не возникает никаких. Версия Excel у всех 2016.

Посоветуйте, пожалуйста, может есть, какой-то более надежный способ автообновления PQ через VBA? Важно, чтобы один макрос выпонялся только после обновления всех запросов.

Автор - Невилл
Дата добавления - 24.02.2020 в 13:33
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Автообновление запросов PowerQuery через VBA (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2022 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!