宏来更新数据库上的过滤器,以包括除#<"空白"同时离开现场设置

时间:2018-04-03 21:57:26

标签: excel excel-vba pivot-table vba

我需要一个宏来选择行标签过滤器并选择除了"空白。"最后一个条件是,我需要宏来保留字段设置:即,我需要"显示没有数据的项目"保持不受控制。

我们尝试了.showallitems = true但是这修改了字段设置以显示没有数据的项目。

还尝试了pivotitem.visible = true但没有发生任何事情。

1 个答案:

答案 0 :(得分:1)

启动Macro录像机,然后清除滤镜,并取消选择空白。这将为您提供所需的代码。

对于非OLAP数据透视表,它将如此简单:

With ActiveSheet.PivotTables("PivotTable2").PivotFields("test")
        .ClearAllFilters
        .PivotItems("(blank)").Visible = False
End With