VBA数据透视表：添加过滤器

Posted 2021-04-07

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了VBA数据透视表：添加过滤器相关的知识，希望对你有一定的参考价值。

使用VBA代码，我创建了一个Pivot表，然后添加了行，列，然后添加了求和值。现在我需要在列上添加过滤器。您能告诉我如何在此专栏中添加过滤器。

答案

请尝试以下代码：

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

例如：

另一答案

尝试下面的代码行

With ActiveSheet.PivotTables("PivotTable Name").PivotFields("Column Name").Orientation = xlPageField.Position = 1

以上是关于VBA数据透视表：添加过滤器的主要内容，如果未能解决你的问题，请参考以下文章

使用 VBA 根据下拉选择过滤多个数据透视表

使用 VBA 过滤 Excel 数据透视表