Excel Vba Обновление сводных таблиц, они исчезают из подключений отчетов - PullRequest
0 голосов
/ 06 сентября 2018

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

    For Each pvtbl In DashboardSheet.PivotTables
       'change the Ranges
       DashboardSheet.PivotTables(pvtbl.Name).ChangePivotCache 
       ActiveWorkbook.PivotCaches.Create _
       (SourceType:=xlDatabase, SourceData:=NewRangeName)
    Next

Это прекрасно работает, но, к сожалению, имеет 2 вопроса

1 - если я пытаюсь добавить слайсер, я не вижу соединений отчета, чтобы связать слайсер со всеми центрами (все центры имеют одинаковый исходный диапазон)
2 - если у меня уже есть слайсер, этот код не работает

одна из ошибок, которые я получаю, это когда я открываю файл и пытаюсь отфильтровать «Отчет сводной таблицы был сохранен без базовых данных» Большое спасибо за вашу помощь, так как я исследовал в Интернете, но не могу понять, что я делаю неправильно

...