Страницы: 1
RSS
VBA и срезы сводной таблицы
 
Коллеги, вопрос в следующем:
как получить выбранные параметры срезов сводной таблицы с помощью VBA?
Может уже кто сталкивался с решением данной задачки?

Спасибо.
 
коллега. а что дал анализ кода, записанного с помощью макрорекодера?
коллекции SlicerCaches, Slicers и тому подобное...
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
Цитата
Павел Михалев пишет:
...решением данной задачки?
А что за задачка?
 
Код
Sub SSC()
'VBA на заказ dg_rusak@mail.ru
 Set sl = ActiveWorkbook.SlicerCaches(1)
    For i = 1 To sl.SlicerItems.Count
      Debug.Print sl.SlicerItems(i).Name & vbTab & sl.SlicerItems(i).Selected
    Next
End Sub
Спасибо
 
R Dmitry, огромное спасибо
 
Коллеги,
данный код выдает ошибку 1004 на строке SlicerItems.Count
Подскажите, как исправить?
 
Выяснил, проблема возникает, когда сводная таблица строится на модели PowerPivot. Если сводная строится на обычном источнике данных (другой лист Excel), то проблем нет.
Однако мне как раз нужно это сделать на модели данных PowerPivot

На stackoverflow.com/questions/39171947/powerpivot-pivottable-slicer-selection говориться, что это сделать можно, но нужно применять SlicerCacheLevel вместо SlicerCache

Но я не могу разобраться, что именно изменить к коде.
Помогите пожалуйста
Страницы: 1
Наверх