实际工作中需要对两张Excel表格内的批量身份证号码进行查重操作，如果用人工校对的方式，费时耗力、效率低下，善加使用Excel函数及VBA代码即可轻松实现查重操作，方法多种多样，让小编来一一教您实现！
当然首先我们需要建立2张包含批量身份证号码的表格，小编这里演示时将身份证号码都放置于A列，假设表一中的身份证号码包含在表二中，则查找显示为是，否则显示为否。当然实际中需要根据身份证所处位置，稍微调整函数及VBA代码，请大家注意，这里就不再赘述。
Excel函数法
这里用Vlookup及Match两种函数分别介绍实现：vlookup函数法：选中B4单元格输入公式：=IF(ISERROR(VLOOKUP(A4,演示表二!A$2:A$20,1,0)),"否","是")；match函数法：选中C4单元格输入公式：=IF(ISERROR(MATCH(A4,演示表二!A$2:A$20,0)),"否","是")，光标置于单元格最下角变为黑色十字时向下拖拉即可填充公式，实现身份证的查重。
VBA代码法
打开VBE编辑器，新建一个模块，输入代码：
Sub 两个Excel查找相同身份证号码()
Dim B2SfzRow As Integer, i As Integer, B1SfrRow As Integer, j As Integer
Application.ScreenUpdating = False
b1sfzrow = Sheet1.Range("a65535").End(xlUp).Row
B2SfzRow = Sheet2.Range("a65535").End(xlUp).Row
For i = 4 To b1sfzrow
Cells(i, 4).ClearContents
For j = 2 To B2SfzRow
If Cells(i, 1).Value = Sheet2.Cells(j, 1).Value Then
Cells(i, 4).Value = "是"
End If
Next j
If Cells(i, 4).Value <> "是" Then Cells(i, 4).Value = "否"
Next i
Application.ScreenUpdating = True
End Sub
VBA代码输入完成后，需要在开发工具选项卡下，单击插入一个表单按钮控件。
完成按钮控件的设置后，需要右键该控件，单击指定自建的宏，最后单击控件按钮即可获得查重结果。
两张Excel表格间多身份证号码间的查重可以有多种多样的方式实现，小编在这里只是起抛砖引玉之举，还请自己多多琢磨为宜。
以上操作演示基于戴尔N5010，Windows7操作系统及Excel2010。