ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 580|回复: 8

[求助] 使用VBA隐藏不符合条件的行

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-1-12 11:48 | 显示全部楼层 |阅读模式
本帖最后由 Irisforever 于 2023-1-12 16:34 编辑

求助! 使用VBA代码隐藏不符合条件的行


已有条件: 1. 如A2,D2,H2单元格为9位的库位信息,倒数第三位数字为层数信息(1到5层)。
                 2. ABC三列为这一组库位信息,以此类推,DEF列,HIJ列,KLM列等。
要求: 1. 在表格最上方建立一个可选择层数的,可以单选或多选层数的区域。如单选2层,或多选1、4、5层
           2. 根据选择的层数将不符合条件的库位隐藏。注意:不是隐藏整行,而是需要隐藏同为这一组(三列)的对应行数。
               如选择1层,则将A2到C71范围的不符合1层的行隐藏,且同时将D2到F176范围的不符合1层的行隐藏。后面的以此类推。
           3. 创建一个释放隐藏行数的按钮,可将隐藏的范围全部释放。

谢谢看到帖子提供帮助的所有人!
祝大家新年平安健康,财源滚滚!







更新:

由于Excel只能隐藏整行,现将所有库位按照层数排序。附件已更新。

要求: 1. 在表格最上方建立一个可选择层数的,可以单选或多选层数的区域。如单选2层,或多选1、4、5层
           2. 根据选择的层数将不符合条件层数所在行隐藏。
           3. 创建一个释放隐藏行数的按钮,可将隐藏的范围全部释放。

update隐藏不符合条件的行.7z

36.43 KB, 下载次数: 5

TA的精华主题

TA的得分主题

发表于 2023-1-12 14:34 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
只能隐藏整行,不能隐藏部分单元格。

TA的精华主题

TA的得分主题

发表于 2023-1-12 15:56 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-12 16:08 | 显示全部楼层
蓝桥玄霜 发表于 2023-1-12 14:34
只能隐藏整行,不能隐藏部分单元格。

感谢回复,那是否可以选择出符合条件的单元格,按照之前的库位布局新建一个sheet并展示出来?

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-12 16:34 | 显示全部楼层

嗯 看来只能按照整行隐藏。附件和要求已更新,能否帮忙看看?

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-12 16:36 | 显示全部楼层
蓝桥玄霜 发表于 2023-1-12 14:34
只能隐藏整行,不能隐藏部分单元格。

按照您的指导更新了附件和要求,能否拜托提供支持?
愿新年平安喜乐~

TA的精华主题

TA的得分主题

发表于 2023-1-12 19:31 | 显示全部楼层
做了个补助工作表,把符合条件的数据输出筛选表,也相当于达到你要隐藏一组里面不符合条件的行。

隐藏不符合条件的行.zip

45.45 KB, 下载次数: 4

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-1-13 11:26 | 显示全部楼层
leirongqin 发表于 2023-1-12 19:31
做了个补助工作表,把符合条件的数据输出筛选表,也相当于达到你要隐藏一组里面不符合条件的行。

代码越短越牛,我先拜读一下!在此谢过了,祝愿您2023大吉大利!

TA的精华主题

TA的得分主题

发表于 2023-1-13 11:35 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
VBA折叠与展开,在论坛里搜
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-19 20:34 , Processed in 0.038364 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表