启用“显示同一列中下一个字段的标签(紧凑形式)

Enable "Display labels from the next field in the same column (compact form)

有没有办法启用选项“显示来自 VBA 中同一列(紧凑格式)中下一个字段的标签?

这只会启用 "Show item labels in outline form"

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

语法应该是:

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