如何从多个Excel表中提取部分相同的数据生成单一的一个Excel文件
具体操作步骤如下：
1、首先，
sheet1的A列和sheet2的A列具有相同的数据。可以通过编写vba代码用相同的数据填充sheet3的A列，如下图所示，然后进入下一步。
2、其次，单击菜单栏左上角的[文件]-[另存为]，如下图所示，然后进入下一步。
3、接着，在弹出窗口中，将[保存类型]选择为[Excel宏工作簿]，再单击[确定]，如下图所示，然后进入下一步。
4、然后，打开刚刚另存为的启用了宏的工作簿，右侧将出现一个黄色感叹号 ，如下图所示，然后进入下一步。
5、随后，在工作表中，单击菜单栏[开发工具]，再单击下方的[Visual
Basic]，如下图所示，然后进入下一步。
6、接着，将进入VBA编辑界面，单击菜单栏中的[插入]，然后在下拉菜单中选择[模块]，如下图所示，然后进入下一步。
7、然后，在模块窗口中输入代码：
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 NextNextEnd Sub。
如下图所示，然后进入下一步。
8、随后，单击[开发工具]-[插入]，插入表单控件，如下图所示，然后进入下一步。
9、接着，将表单控件命名为“筛选相同数据”，并将其与编写的Visual Basic代码相关联，如下图所示，然后进入下一步。
10、最后，单击【筛选相同数据】按钮，将立即过滤工作表1的A列和工作表2的A列中的相同数据，并将其输入到工作表3的A列中。如下图所示。这样，问题就解决了。
