Несогласованное поведение таблиц PowerPivot со свойствами VBA, например, DrilledDown и ShowDetail. - PullRequest
0 голосов
/ 02 августа 2020

недавно я пытался автоматически разворачивать и сворачивать сводные таблицы (созданные из PowerPivot), но не могу заставить его работать.

Вот простой пример кода:

ActiveSheet.PivotTables("PivotTable1").PivotFields( _
        "[Dimension].[Subfield].[Subfield]").PivotItems( _
        "[Dimension].[Subfield].&[TestField]").DrilledDown = True

Debug.Print ActiveSheet.PivotTables("PivotTable1").PivotFields( _
        "[Dimension].[Subfield].[Subfield]").PivotItems( _
        "[Dimension].[Subfield].&[TestField]").DrilledDown
' this results in an output of FALSE even though it is correctly expanded

Второй Я не могу получить доступ к полю ShowDetail. Я не знаю почему.

Debug.Print ActiveSheet.PivotTables("PivotTable1").PivotFields( _
        "[Dimension].[Subfield].[Subfield]").PivotItems( _
        "[Dimension].[Subfield].&[TestField]").ShowDetail

Это приводит к ошибке 1004, в которой говорится: «Не удалось получить свойство ShowDetail из класса PivotItem, но это соответствует его части документации.

Спасибо.

...