Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 5118|回复: 7

[已解决]用宏查找所在行的下一行数据

[复制链接]
发表于 2013-12-1 12:39 | 显示全部楼层 |阅读模式
假设在单元格内输入某个数值,要示筛选出所有包含有该数值的行的下一行数据。一定要用宏

例如   Sheet1 数据  A   B   C   D   E   F   G    数据可能有上百行
                              1   2   3    4   5   6   7
                              G   F   E    D  C   B   A
                              7   6   5    4   3   2   1
效果是   
Sheet2 单元格输入    B   后
                             1    2    3   4   5   6    7
                             7    6    5    4   3   2   1
                           
最佳答案
2013-12-7 13:51
本帖最后由 yyyydddd8888 于 2013-12-7 13:54 编辑
lishenchen 发表于 2013-12-7 12:25
知道  了,少了个清空以前筛选数据的命令。筛选数据比以前数据行数少就会附盖不完。以前数据还留在。
再加一句清空以前数据的代码:
如果可以用,请帮忙给我评个最佳哈!

BOOK.zip (8.4 KB, 下载次数: 45)

BOOK.rar

2.16 KB, 下载次数: 14

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2013-12-1 13:24 | 显示全部楼层
本帖最后由 yyyydddd8888 于 2013-12-1 14:09 编辑

请测试:
BOOK.zip (8.09 KB, 下载次数: 30)
回复

使用道具 举报

 楼主| 发表于 2013-12-6 08:37 | 显示全部楼层
yyyydddd8888 发表于 2013-12-1 13:24
请测试:

谢谢!基本满足要求。但是有两个小问题:
1、如果同一行有两个相同数据,筛选出来的数据也会有两行相同的数据。
2、比如筛选的数据理‘8’,所在行的下一行无数据时就会提示出错。
回复

使用道具 举报

发表于 2013-12-6 11:51 | 显示全部楼层
lishenchen 发表于 2013-12-6 08:37
谢谢!基本满足要求。但是有两个小问题:
1、如果同一行有两个相同数据,筛选出来的数据也会有两行相同的 ...

请看这样行不行?
BOOK.rar (7.94 KB, 下载次数: 10)
回复

使用道具 举报

 楼主| 发表于 2013-12-6 12:32 | 显示全部楼层
yyyydddd8888 发表于 2013-12-6 11:51
请看这样行不行?

有个问题,如果最后两行数据中都有被筛选数值;
筛选结果是这两行数据都出现,应该只有最后一行数据才对。
回复

使用道具 举报

发表于 2013-12-6 13:29 | 显示全部楼层
lishenchen 发表于 2013-12-6 12:32
有个问题,如果最后两行数据中都有被筛选数值;
筛选结果是这两行数据都出现,应该只有最后一行数据才对 ...

1、不会啊!如果最后一行包含筛选数据,宏根本就不会去对比它,更不会把它筛选出来。
2、如果使用中出现错误,请把错误的表用附件发上来。并注明出错的地方及要求达到的效果。
回复

使用道具 举报

 楼主| 发表于 2013-12-7 12:25 | 显示全部楼层
yyyydddd8888 发表于 2013-12-6 13:29
1、不会啊!如果最后一行包含筛选数据,宏根本就不会去对比它,更不会把它筛选出来。
2、如果使用中出现 ...

知道  了,少了个清空以前筛选数据的命令。筛选数据比以前数据行数少就会附盖不完。以前数据还留在。
回复

使用道具 举报

发表于 2013-12-7 13:51 | 显示全部楼层    本楼为最佳答案   
本帖最后由 yyyydddd8888 于 2013-12-7 13:54 编辑
lishenchen 发表于 2013-12-7 12:25
知道  了,少了个清空以前筛选数据的命令。筛选数据比以前数据行数少就会附盖不完。以前数据还留在。
再加一句清空以前数据的代码:
如果可以用,请帮忙给我评个最佳哈!

BOOK.zip (8.4 KB, 下载次数: 45)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-13 23:01 , Processed in 0.247332 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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