VBA透视表筛选子程序

作者: 林万程 | 来源:发表于2017-01-05 23:56 被阅读159次

VBA透视表筛选子程序
二级模拟题整理（二）
VBA数据透视表
学习14
数据透视表的“显示报表筛选页”为什么是灰色？
技能 | 数据透视表筛选功能汇总
2018-09-17 excel跨列居中
Day3排序和筛选的高级用法
Excel VBA 批量创建带名称的任意数量的工作表
数据处理VBA篇：基础概念

Sub 透视筛选(pf, pv, v)

With ActiveSheet.PivotTables("数据透视表1").PivotFields(pf)
    .EnableMultiplePageItems = True
    For Each pii In .PivotItems '全部选中以免出现全不选错误
        pii.Visible = True
    Next
    For Each pii In .PivotItems
        If IsError(Application.Match(pii.Name, pv, 0)) Then
            pii.Visible = Not (v) '不存在
        Else
            pii.Visible = v '存在
        End If
    Next
End With

End Sub

调用例子：
Call 透视筛选("层数", Array("all"), False) '全部选中

Call 透视筛选("储位编码", Array("AA52"), True)

VBA透视表筛选子程序
Sub 透视筛选(pf, pv, v) End Sub 调用例子：Call 透视筛选("层数", Array("a...
二级模拟题整理（二）
一、工作表内容合并数据 - 数据工具 - 合并计算二、数据透视表基于下表创建一个数据透视表，透视表中要求筛选...
VBA数据透视表
学习14
1.如何插入数据透视表 2.如何对数据透视表中的数据进行排序和筛选image.png其他排序选项即可筛选 3.怎样...
数据透视表的“显示报表筛选页”为什么是灰色？
Excel数据透视表的“显示报表筛选页”是非常赞的一个功能——可以按筛选项分别建立单独的透视表。但问题是，我的Ex...
技能 | 数据透视表筛选功能汇总
数据透视表可以快速统计数据源那么如何对数据透视表中的数据进行筛选为大咖决策提供有效的数据支持呢？ 1直接筛选 ...
2018-09-17 excel跨列居中
excel种经常使用数据筛选，或者透视表，如果是合并居中，那透视表就没法看了，但是为了美观（强迫）和好看（症）。 ...
Day3排序和筛选的高级用法
基本用法、进阶用法、自定义排序、横向筛选、数据透视表筛选、辅助列的应用、高级筛选、动态筛选 1、基本用法 1.基本...
Excel VBA 批量创建带名称的任意数量的工作表
在这相同的问题上，之前推送了使用数据透视表批量创建工作表的教程，该方法巧妙的利用了数据透视表的「报表筛选页」功能，...
数据处理VBA篇：基础概念
对象#### 用VBA来操作的东西，比如工作簿，工作表，单元格，图表，透视表，图片等集合相同类型对象的统称，如...