Добрый день!
Есть файл с запросом 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? Важно, чтобы один макрос выпонялся только после обновления всех запросов.