发布时间:2026-06-22阅读(1)
一、excel自带的删选功能

选中A1:C12,单击“数据”--筛选--

点学校右侧下拉按钮--

G2 输入
=IF(ROW()=COUNTA($A:$A),IF(COUNTIF(D:D,A2),VLOOKUP($A2,$D:$F,COLUMN(A:A),),""),INDEX(D:D,SMALL(IF(COUNTIF(A$2:A$100,D$2:D$100),4^8,ROW($2:$100)),ROW()-COUNTA(A:A))))&""
CTRL SHIFT ENTER三键结束
向下拖动,有重复的在上面显示,没有的,在下面补全

=IF(ROW()=COUNTA($A:$A),IF(COUNTIF(D:D,A2),VLOOKUP($A2,$D:$F,COLUMN(A:A),),""),INDEX(D:D,SMALL(IF(COUNTIF(A$2:A$100,D$2:D$100),4^8,ROW($2:$100)),ROW()-COUNTA(A:A))))&""
$A:$A 姓名列
d:d =A2 d列数据和a2比较
$A2,$D:$F,COLUMN(A:A)
A$2:A$100,D$2:D$100 区间
ROW($2:$100 2-100行

如上图 : 筛选出两列中相同的数据并配对排序,也要补全他后面的数据
=IFERROR(VLOOKUP($A2,$F:$H,COLUMN(),),"")
三、以下是我上次头条内容
先制作2个表

基本调用

信息筛选
制作完2个表后, 开发模式----visual basic

代码输入:
Sub 高级筛选()
Sheets("基本调用").Range("A3:K65536").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("A1:j2"), CopyToRange:=Range("A6:j6"), Unique:=False
End Sub
保存后,退出visual basic
插入艺术字 “高级筛选”---右击--指定宏---选“高级筛选”--确定


输入查询条件,如 学校名称输入 “|一中”

说明: 根据代码信息,可以根据自己情况,适当修改
可以单条件也可以多条件查询
希望能帮到你,如果可用,别忘了加关注啊!
Copyright © 2024 有趣生活 All Rights Reserve吉ICP备19000289号-5 TXT地图HTML地图XML地图