Excel VBA 多条件多次筛选

今天要讲的例子主要是多条件的筛选。

问题如下:

Excel VBA 多条件多次筛选

解决的思路如下:

Excel VBA 多条件多次筛选

代码运行的结果如下:

Excel VBA 多条件多次筛选

代码如下:

Excel VBA 多条件多次筛选

代码解析

1:2~3行 DIM定义变量,arr是原始数据,crr是条件区数据,brr是查询数据;

2:4、31行 关闭、打开屏幕刷新

3:5行 把原始数据传给arr

4:6~10行 把查询单元格,赋值给变量ran,并把查询区赋值给brr,条件区赋值给crr;

5:12~16行 遍历条件区,用str连接的非空条件,并用n统计非空的数量;

6:18~29行 遍历arr数组,用str1组合与条件区符合的字符串。。

7:22~26行 对比str与str1字符串,如果相等,就把数据传递给brr;

8:30行 清空目标区域的值,并赋值brr

私信 视频 可以获取54集VBA入门视频

私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件


分享到:


相關文章: