Сначала файл сохраняется, потом запускается процесс обновления запроса PQ, далее он фризится, программа доходит до вышеупомянутой строки, ждёт указанное время, после чего процесс обновления запроса продолжается и я жду еще больше времени. Даже если вставлять задержку перед сохранением и обновлением - это ничего не дает.

Код писал с планшета было очень неудобно 😀. Файл смогу к вечеру приложить

Sub save-and-refresh

with thisworkbook
 .save
 .connections (“query - sheet4”).refresh
end with

Application.wait(now+timeserial(0, 0,15)) 

msgbox “запрос обновлен»

end sub