Обновить таблицу запросов VBA - PullRequest
0 голосов
/ 04 мая 2018

У меня есть книга Excel 2016 с 2 внешними источниками данных (оба к одному и тому же файлу Excel).

Одно соединение для простой таблицы запросов, а другое для сводной таблицы. Я настроил VBScript для запуска макроса в этой книге, чтобы обновить оба внешних источника данных; добавить метку времени и сохранить.

Кажется, что все работает, за исключением таблицы запросов ("X"), которая не обновляется (также находится на листе 2, как и сводная таблица).

Разве ActiveWorkbook.RefreshAll не предназначен для обновления таблиц запросов, но работает исключительно с сводными таблицами или мне не хватает некоторого кода? Запуск Data - Refresh All вручную из Excel также не обновляет таблицу запросов, хотя Right click - Refresh в таблице делает это.

Как я могу включить обновление таблицы запросов в этот код?

Sub Update()

ActiveWorkbook.RefreshAll
Sheets("Sheet2").PivotTables("PivotTable8").PivotCache.Refresh

With Range("M12")
.Value = Now()
.NumberFormat = "dd/mm/yy hh:mm"
ActiveWorkbook.Save

End With
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...