订阅如何在两个excel表中筛选相同的数据
来源：网络收集 点击： 时间：2024-04-08sheet1表A栏和sheet2表A栏有相同的数据！可以通过编写vba代码！将相同的数据填入sheet3表A栏中！
2/11单击菜单栏中的【文件】，在下拉菜单中选择【另存为】！
3/11在【另存为】窗口中的【保存类型】处选择【Excel启用宏的工作簿】，然后点击【确定】！
4/11打开刚才另存为的启用宏的工作簿，右边会有一个黄色的小“！”！
5/11在工作表中，点击菜单栏【开发工具】，在其工具栏内，点击【visual basic】!
6/11会进入VBA编辑界面！点击菜单栏【插入】，在其下拉菜单中，选择【模块】！
7/11会弹出模块编辑窗口！
8/11在模块窗口输入以下代码：
Sub 筛选相同数据()
Set Rng = Sheet1.Cells(Rows.Count, 1).End(xlUp)
Set rngs = Sheet2.Cells(Rows.Count, 1).End(xlUp)
For Each rn In Sheet1.Range(a3, Rng)
For Each rns In Sheet2.Range(a3, rngs)
If rn = rns Then i = i + 1: Sheet3.Cells(i + 1, 1) = rn
Next
Next
End Sub
9/11点击【开发工具】工具栏中的【插入】按钮，插入一表单控件！
10/11将表单控件命名为“筛选相同数据”，并与编写的vba代码相关联！
11/11点击“筛选相同数据”按钮，sheet1表A栏和sheet2表A栏有相同的数据就会被瞬间筛选输入sheet3表A栏中！
注意事项触类旁通，不明白之处可留言交流！
版权声明：
1、本文系转载，版权归原作者所有，旨在传递信息，不代表看本站的观点和立场。
2、本站仅提供信息发布平台，不承担相关法律责任。
3、若侵犯您的版权或隐私，请联系本站管理员删除。
4、文章链接：http://www.1haoku.cn/art_472450.html
