咔片PPT · AI自动生成演示文稿,模板丰富、排版精美 讯飞智文 · 一键生成PPT和Word,高效应对学习与办公

分享成果,随喜正能量】嘴狠,赢一时;心广,赢一世;坦诚待人,真诚做事,淡定看人,淡然处世。能够善待和无视不太喜欢的人,并不代表你虚伪,而意味着你内心成熟到可以容纳这些不喜欢。

《VBA经典应用69例》,是我推出的第九套教程,教程是专门针对初级、中级学员在学习VBA过程中可能遇到的案例展开,这套教程案例众多,紧贴“实战”,并做“战术总结”,以便大家能很好的应用。教程的目的是要求大家在实际工作中要利用好VBA。本套教程共三册六十九个专题,今日内容是教程的应用5:完成多个指定值的数据筛选。

应用4 VBA中的自动筛选(Autofilter)

大家好,我们这个专题讲解VBA中的自动筛选(Autofilter),一般情况下,我们学习VBA之前都比较熟悉了Excel的利用,为了进一步提高效率,才学习VBA,把VBA宏派上用场。在Excel工作表中,我们可以轻松地根据标准功能,使用"数据"菜单内的"筛选"功能,完成多种多样的筛选以处理各式各样的信息。我们这讲的内容是利用VBA完成自动筛选。

对于应用而言,从小数据集合中过滤掉必要的信息可以使用"筛选"功能。但是,如果你希望根据多个标准和条件过滤大量数据,利用VBA自动过滤器功能可以更轻松。它可以为你节省大量的时间和精力。例如,假设你希望筛选下拉列表中的某些信息(基于多个标准),然后将结果复制/粘贴到其他工作表中。如果手动完成,这似乎是一项非常耗时的任务。在这种情况下,VBA可以帮助你自动化完成这个过程。

7 完成多个指定值的数据筛选

在筛选中,还有一种情况是多个指定值的筛选,我们再来回顾一下我们这讲的数据源:

在这个数据源中,我们要提取指定的数据:小猫,小象,小鸟数据的筛选,筛选后提取数据到其他工作表中,该如何处理呢?这种情况下需要设置筛选的指定值数组和Operator:=xlFilterValues的设置,这种设置下可以完成指定值的筛选。

下面看我给出的代码:

Sub mynzF()

'清空数据

[代码见教程]

End Sub

代码截图:

代码解读:

① Array("小猫", "小象", "小鸟") 是指定要筛选值的数组

② Operator:=xlFilterValues 是设置指定值的筛选

代码的运行结果:

结论:Excel 的"Autofilter"工具本身就是一个很好的工具,VBA中的自动筛选(Autofilter)也是功能强大。随着数据集的增加,代码也会动态调整自己。但是,我给大家一个建议,这种应用最好应用在最多5000行数据上,再多不建议用这种方案。

今日内容回向:

1 VBA自动筛选的语法是什么?

2 本讲介绍了多种不同的应用,是否理解?

本讲内容参考程序文件:应用004.xlsm

我20多年的VBA实践经验,全部浓缩在下面的各个教程中:

分享成果,随喜正能量】人生看不惯的东西太多,看清、看懂,全是自找伤心。给生活罩上一层薄雾,不是自欺,而是对自我的保护。凡事太认真,苦了心,累了自己。