使用数据透视表向导创建的透视显示（全部）而不是（多个项目）

Question

我正在使用以下代码以编程方式生成数据透视表：

Set objTable = wb.PivotTableWizard
ActiveSheet.Name = "Pivot Table"

Set objField = objTable.PivotFields("CURRENT_STATUS")
objField.Orientation = xlPageField
objField.EnableMultiplePageItems = True

我使用

为报表过滤器设置了某些字段的可见性

With objTable.PivotFields("CURRENT_STATUS")
    For Each PvI In .PivotItems
        Select Case PvI.Name
        Case "A","B","C"
            PvI.Visible = False
        Case Else
            PvI.Visible = True
        End Select
    Next
End With

正确创建了数据透视表，只选择了所需的项目，但报表过滤器显示（全部）而不是（多个项目）

如何让枢轴显示文本（多个项目）

Answer 1

我找到了解决方案

将ShowPageMultipleItemLabel属性显式设置为＆＃34; True＆＃34;做了伎俩。虽然默认情况下该值应为True。不知道为什么在这种情况下不是这样。

objTable.ShowPageMultipleItemLabel = True