Я пытаюсь написать сценарий VBA (MS Excel), который позволяет мне автоматически обновлять sh сводные таблицы при обновлении источника данных. Я использовал приведенный ниже код, где сводные таблицы находятся на листе «Sheet1»
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Worksheets("Sheet1").PivotTables("PivotTable1").RefreshTable
End Sub
Этот код работает только тогда, когда я вручную изменяю данные в источнике данных. Однако я хочу, чтобы сводные таблицы обновляли sh, когда данные в источнике данных меняются из-за функций ВПР, а не из-за ручного ввода.
Возможно, у кого-нибудь есть решение для этого?
Спасибо.