У меня есть книга 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