Включить "Отображать метки из следующего поля в том же столбце (компактная форма)

Question

Есть ли способ включить параметр "Отображать метки из следующего поля в том же столбце (компактная форма) в VBA?

Включает только "Показывать метки элементов в форме контура"

ActiveSheet.PivotTables("Name of pivot table").PivotFields("Name of pivot field").LayoutForm = xlOutline

Answer 1

Синтаксис должен быть:

ActiveSheet.PivotTables("Name of pivot table").PivotFields("Name of pivot field").LayoutCompactRow = True