首页 > 解决方案 > VBA CubeField 过滤器

问题描述

对于我正在做的普通数据透视表

For Each item In .PivotTables("table1").PivotFields("field1").PivotItems
    If item.Value = "asdf" Then
        item.Visible = True
    Else
        item.Visible = False
    End If
Next item

wherefield1不是页面字段。我可以在数据模型数据透视表中做同样的事情吗?我已经阅读了有关 CubeFields 的信息,但我没有安装 PowerPivot。

标签: excelvbapivot-table

解决方案


没有任何文档、论坛或视频教程可以驱使我找到这个答案,所以为了未来的人类,我分享它。

.PivotTables("table1").CubeFields( _
    "[MyDB].[field1]").CreatePivotFields
.PivotTables("table1").PivotFields( _
    "[MyDB].[field1].[field1]").VisibleItemsList = Array( _
    "[MyDB].[field1].&[asdf])

用您自己的对象替换、MyDBtable1field1asdf


推荐阅读