身份证查重复值

由于可能相同数据太多，如果用不同格式（如颜色之类）表示每个相同，格式会不够用，建议增加临时辅助列，如A列和B列中间增加2列，即B 变为D列，如果A/D相等数据，则新的B列(对应A列)与C列(对应D列)相等数据位置均标为：1，1；2，2；3，3；，这样就容易找到对应的位置了。建议用VBA，注意A列或B列本列增多没有相同的重复数据；代码如下：（代码放在Thisworkbook或模块里，不要放在工作表里），提前在原A、B列中间插入2列空白：Sub SameIDMark()    Dim rngCLA As Range, rngCLD As Range    ThisWActivate    Sheets("重复ID")Activate   '工作表名称"重复ID"改成实际的    For Each rngCLA In Range(Cells(1, "A"), Cells(Cells(RCount, "A")End(xlUp)Row, "A"))        For Each rngCLD In Range(Cells(1, "D"), Cells(Cells(RCount, "D")End(xlUp)Row, "D"))            If rngCLAValue = rngCLDValue Then Cells(rngCLARow, "B")Value = i: Cells(rngCLDRow, "C")Value = i: i = i + 1: Exit For        Next    NextEnd Sub视频如是：

可以定做软件，曾经有个手机号的对比，我找了个人跟我写了个软件可以对比查出来，身份证应该也没问题，重复的，不重复的，两个文件对比，单个文件对比，应该可以解决 重复对比软件，快速整理

用函数vlookup来匹配。或用MS Office的access来配对。