csx 发表于 2022-5-25 18:55

EXCEL按单元格内容进行筛选-VBA版-4版

本人在公司统计项目杆件号时,需要对每张图纸进行筛选后核实杆件是否遗漏(其中杆件号中间的数据为图纸号,如:1001),由于数据行数较大(30多万行),通过“筛选三角下拉框”-“搜索框”的方式进行筛选时速度已经很慢,每次需要在筛选时选择“文本筛选”-“包含”的方式进行搜索,这样搜索操作很费时。为了解决这个问题,在表格中选一个单元格(我选择的是N1单元格)作为图纸号的专用单元格,在点击筛选就直接能筛选出相应的图纸号,这样就节省了很多的操作,具体请见附件中的例子,其中VBA代码也附在文件里。因为每个人的数据不一样,如果需要修改,可以直接在VBA代码里进行修改,使筛选的功能符合自己的要求,现免费分享给吾爱的家人们,希望大家早点下班!
2版说明:增加了一个可以增加或减少数字的控件,可以不用每次输入图纸号,对顺序的图纸号比较友好。
3版说明:对代码进行了小优化,并对控件进行了升级,使数值范围更大
4版说明:根据吾友missmin的需要,增加了对多筛选条件的支持(暂时增加3个条件,更多条件请自行修改代码即可),并对条件增加了参数表,设置了数据有效性,方便筛选时快速选择。在此感谢吾友missmin的支持厚爱,使功能更加强大!



百度网盘链接:https://pan.baidu.com/s/1zEK7H_ni_3NewKsw-XAygA    提取码:52pj

阿里云盘: https://www.aliyundrive.com/s/7GvjD14GW2R

页: [1]
查看完整版本: EXCEL按单元格内容进行筛选-VBA版-4版