VBA数据透视表：添加filter

使用VBA代码，我创build了一个Pivot表，然后添加行，列和总和值。 现在我需要在列上添加一个filter。 你可以让我知道如何添加filter到这个专栏。

Answer 1

尝试下面的代码：

Sub Makró2() With ActiveSheet.PivotTables("Kimutatás1").PivotFields("a") .PivotItems("asd").Visible = False .PivotItems("hj").Visible = False End With End Sub 

例如：