如何将查找到的行一次性复制出来？

我是小小白

特别感谢huanglicheng8楼的代码，经过测试正常，找开你想要处理的表格，按ALT加F11打开VBA编辑，左上角视图里面代码窗口，复制上面8楼的代码放在那个框里，保存后再出来的窗点否，保存为启用宏的工作表。主要工作完成，打开视图里面最右面查看宏，点编辑，里面有个查找内容为“音”，这个是8楼老哥用的，查找什么，自己替换成想要找的内容，再关闭，然后再次打开宏里面点运行，程序开程工作，又弹出个工作表，就是已经查找出来的想要的东东，都1：00多了，为了这个找了很久，大家自己研究吧，我睡了。大家为我我为大家嘛。

hxjxinfuer

哪位大侠能否将8楼的代码修改成可以将同一工作簿中全部工作表一次性查找到的行复制出来？

sykabc

huanglicheng 发表于 2014-8-6 10:21
供参考 ：查找符合条件的行 并复制到新表中

谢谢huanglicheng分享，收藏了，学习学习。

abigailluck

李兴德 发表于 2014-8-6 10:14

你好，请问最后一步的查询结果是怎么复制出来的啊？动态图没有显示操作步骤

谢谢~

abigailluck

huanglicheng 发表于 2014-8-6 10:21
供参考 ：查找符合条件的行 并复制到新表中

谢谢大神  问题解决了 。VBA很厉害！赞赞赞！！！

abigailluck

李兴德 发表于 2014-8-6 10:07
查找全部→Crrl+A→Ctrl+C→Crrl+V

实现不了。希望详尽的解释分析一下。谢谢了

hxn11cs

要复制符合条件的所有行，在李德兴的基础上，做点改进就可以实现了，首先复制粘贴一列，按列查找全部——删除——按该列排序，空白的都是你想要的数据

仁者气质

李兴德 发表于 2014-8-6 10:14

不错你这方法确实简便易用，但是现在想问另一个问题，还是你拿你这个表问个问题，假如A列是几千几万个数据，我只想把其中最多的找出来，于是我就用countif函数知道了张三是多少个，李四又是多少个，假如张三和李四，还有王五，赵二多达几百个是一样多的现在，我就要把这些提取出来，或者导出来，该如何做呢

Aone2021

huanglicheng 发表于 2014-8-6 10:21
供参考 ：查找符合条件的行 并复制到新表中

中午好，你在2014-8-6 10:21 写的关于如何将查找到的行一次性复制出来？的VBA, 我在2019年在WIN8系统中使用过。非常好用。后来换的电脑，在WIN10系统里面，就没有办法完整的完成导出页面的执行。想请教一下有没有什么方法，可以继续使用这个功能吗？谢谢。