百度360必应搜狗淘宝本站头条
vba高级教程svn连接scheduledtaskmybatis plus结构体数组
当前位置：网站首页 > 编程网 > 正文

VBA|多条件自动筛选、高级筛选提取唯一值

yuyutoo 2024-10-20 13:05 10 浏览 0 评论

数据在Excel表中的筛选，也就是根据定义的条件将需要的数据记录从数据清单中选择出来，同时Excel表只显示你选择的这一部分数据，而不是全部，主要是用来对数据进行整理和分析或数据的提取的。数据筛选相当于数据库中的“查询”(Select)命令(通过子命令Where定义条件)。(Excel中定义的数据筛选源区域也就是数据清单，是有数据库中的表的概念的，表头相当于字段，表头下的每一行就是记录。)

Excel中的数据筛选都需要定义筛选的条件，根据构造条件的方式不同分为自动筛选和高级筛选。自动筛选是通过对话框来构造单一条件，操作比较直观简单便捷。高级筛选是通过数据筛选源数据以外的单元格区域自定义条件，可以定义多个，比较适应多条件、复杂条件的情形。

Excel中的筛选，可以通过工作表选项卡区中的命令直接完成，也可以通过VBA代码完成。（其实也就是将整个筛选操作的过程录制成宏，再适当修改代码。）

1 多条件自动筛选

Sub Filter_MoreCriteria()

Dim Crit As Variant

Application.ScreenUpdating = False

With Worksheets(1)

If .FilterMode = True Then .ShowAllData

.Range("A1").AutoFilter Field:=1, Criteria1:="1243301", Operator:=xlOr, Criteria2:="1288178"

.Range("B1").AutoFilter Field:=2, Criteria1:="ORA"

End With

Application.ScreenUpdating = True

End Sub

2 高级筛选提取唯一值

Sub 高级筛选提取唯一值()

Dim X As Integer

Columns(13).Clear

X = Range("A" & Cells.Rows.Count).End(xlUp).Row

Range("A1:A" & X).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("M1"), Unique:=True

End Sub

3 代码要点

使用AutoFilter或AdvancedFilter方法完成自动筛选或高级筛选：

工作簿.单元格对象.AutoFilter ...

工作簿.单元格对象.AdvancedFilter ...

以上代码完成的如下命令的功能：

数据→筛选…

数据→高级筛选...

(如果不熟悉相关VBA代码，可以通过“录制宏”的方式先录得代码，再适当改动即可。

4 筛选的工作表选项卡区图标命令操作

4.1 自定义筛选

对某列定义筛选条件实现筛选；

4.2 高级筛选

4.2.1 建立条件区域（与需要筛选的数据清单分开）；

4.2.2 可以将筛选结果复制到其它区域；

4.2.3 指定需要筛选的列表区域；

4.2.4 指定条件区域；

相关推荐

Docker部署 chatgpt-web-midjourney-proxy:开启一站式AI与绘图

ChatGPT和Midjourney的结合无疑是创新性的突破。ChatGPT作为强大的语言模型，能够为用户提供智能的对话和文本生成服务。而Midjourney则以其出色的绘画能力，能够根据...

Cacti监控服务器配置教程(基于CentOS+Nginx+MySQL+PHP环境搭建)

具体案例：局域网内有两台主机，一台Linux、一台Windows，现在需要配置一台Cacti监控服务器对这两台主机进行监控...

那些少为人知却非常有意思好用的 Chrome 扩展

ChromeWebStoreSessionManager要睡觉了，还有网页没看完怎么办？等明天点开歷史记录重新加载？No！有这个保存当前打开的链接，下回直接打开一串网址，好顶赞有木有！！！chr...

分享一款轻量级 HTTP(S) 代理 TinyProxy

概述众所周知，我们常用的Web服务器Nginx/Apache都可以很方便的用来做为正向或反向代理服务器使用。但是它们都并不支持HTTPS的正向代理。Nginx做为正向代理不支持HT...

深入理解 WebSecurityConfigurerAdapter「源码篇」

我们继续来撸SpringSecurity源码，今天来撸一个非常重要的WebSecurityConfigurerAdapter。我们的自定义都是继承自WebSecurityConfigurer...

RPC、Web Service等几种远程监控通信方式对比

几种远程监控通信方式的介绍一.RPCRPC使用C/S方式，采用http协议，发送请求到服务器，等待服务器返回结果。这个请求包括一个参数集和一个文本集，通常形成“classname.meth...

老酒好喝，5G时代数据中心柴油发电机组以GPRS方式接入动环监控

背景：随着手机的普及，电信运营商基站越建越多，网络覆盖范围也越来越广，基本上随时随地都能通过运营商的网络上网冲浪，这给我们传统的通过有线方式实现的动环监控也提带来了新的启发：对于不具备有线传输条件的的...

为了春节红包大战，微信做了一次成功的预热!

经过上午的预告，微信在今天下午17：00正式推出了微信红包新玩法——红包照片。微信用户在朋友圈点击照片发送按钮，会看到“红包照片”选项，用户在选择发布照片之后，这张照片将被模糊处理后，再发送到朋友...

Proxy-Lite实战:3步部署+2个案例，轻松掌握轻量级网页自动化

大家好，我是何三，80后老猿，独立开发者一、Proxy-Lite模型概述...

会Python?那么你一定要试一试mitmproxy

mitmproxy是一款工具，也可以说是python的一个包，使用这个工具可以在命令行上进行抓包(现在也可以在web页面上查看上抓的数据包了)，还可以对所抓到的包进行脚本处理，非常有用。和...

十大Web安全扫描工具，你知道哪些?

初入门时，喜欢将目标站点直接丢扫描器，慢慢等扫描结果，极度依赖Web扫描器;而有一些漏洞高手，善于运用运用各种工具但并不依赖工具，经常可以找到扫描工具发现不了的漏洞。一款好用的Web扫描器对于白帽子来...

鸿蒙5网页开发神器 ArkWeb:让 Web 和原生手拉手跳舞

你有没有想过，在鸿蒙应用里既能用原生代码写高性能界面，又能直接塞进一个网页？这听起来有点像把汉堡和披萨拼在一起，但ArkWeb（方舟Web）真的做到了！今天咱们就聊聊这个神奇的工具，看看它如何让...

MapReduce过程详解及其性能优化(详细)

从JVM的角度看Map和ReduceMap阶段包括：第一读数据：从HDFS读取数据1、问题:读取数据产生多少个Mapper？？Mapper数据过大的话，会产生大量的小文件，由于Mapper是基于虚拟...

大数据平台建设需要掌握的14个知识

Q1、大数据分析中的实时推荐是如何实现的？@rein07某证券系统架构师：实时推荐需要使用实时处理框架结合推荐算法，从而做到对数据的实时处理和推荐。实时处理框架有Storm、Flink、Spark...

HDFS可视化管理系统设计与实现（hdfs的可靠性设计,主要依靠哪些机制来实现）

摘要：Hadoop工具核心模块包括分布式文件系统（HadoopDistributedFileSystem，HDFS）和分布式编程模型MapReduce，其中HDFS是Hadoop数据存储处理的...

取消回复欢迎 你 发表评论:

一周热门
最近发表
标签列表