1、sheet1表A栏和sheet2表A栏有螽啸镥释相同的数据!可以通过编写vba代码!将相同的数据填入sheet3表A栏中!
2、单击菜单栏中的【文件】,在下拉菜单中选择【另存为】!
3、在【另存为】窗口中的【保存类型】处选择【Excel启用宏的工作簿】,然后点击【确定】!
4、打开刚才另存为的启用宏的工作簿,右边会有一个黄色的小“!”!
5、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!
6、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!
7、会弹出模块编辑窗口!
8、在模块窗口输入以下代码:Sub 筛选相同数据()Set Rng = Sheet1.觊皱筠桡Cells(Rows.Count, 1).End(xl炽扃仄呦Up)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 NextNextEnd Sub
9、点击【开发工具】工具栏中的【插入】按钮,插入一表单控件!
10、将表单控件命名为“筛选相同数据”,并与编写的vba代码相关联!
11、点击“筛选相同数据”岳蘖氽颐按钮,sheet1表A栏和sheet2表A栏有相同的数据就会被瞬间筛选输入sheet3表A栏中!