【Excel VBA编程】通过VBA方法自动实现切片器功能

目录

引言

问题的分析与设计

手动插入切片器

编写代码插入切片器

代码入口设计

代码实现

运行结果

回顾总结

---

引言

最近一打开手机或电脑，各种关于Excel的操作文档、视频铺天盖地涌来，也可能是近期关注的比较多，大数据分析之后感觉我喜欢这些，就源源不断的推送给我了吧

其中最吸引我的就是Excel的“切片器”功能，是Excel 2010及以上版本中引入的一个功能，用于对数据透视表或数据透视图进行筛选。之前没有接触过切片器，所以就试着多了解了一些相关内容，现在整理出来分享给大家，希望对你们有所帮助吧

为了方便大家理解，下面继续通过一个实例来聊一聊“切片器”。如下，有一张商铺销售量表格，现在需要根据“商铺”字段来筛选过滤数据，比如选择“华东1号店”就只显示“华东1号店”的数据信息，其他店铺的需要屏蔽掉。

虽然也可以通过数据-筛选（小漏斗）来实现这个功能，但操作起来还是比较麻烦的，又是下拉又是要勾选条件的，如果店铺再多点，或者在向领导做汇报演示的话，不但自己手忙脚乱，还给领导留下不好的印象

相对而言，Excel的切片器就相对友好便于操作使用，只需要点击对应的商铺信息，直接筛选数据，内容显示如下

一起来看看切片器是如何插入，又是如何与表格数据关联在一起实现数据透视功能的吧？

问题的分析与设计

任何需求想通过自动化实现，都需要我们搞清楚手工操作流程，以及每一步骤的原理。所以想通过VBA编码的方式实现切片器功能，首先试着手动操作一遍流程

手动插入切片器

手工插入切片器可以分两步实现

1. 将普通表格转成超级表格。选中数据区域，通过【插入】-【表格】转换为超级表。需要注意：数据区域不能包含合并单元格‌
2. 在【表设计】选项卡中点击【插入切片器】，选择需要筛选的字段。这里需要注意&#