主题：求如何核对两个EXCEL中的姓名和身份证号是否一致

我是新手,有两个EXCEL,

用文本对比软件吧

导入狐表后就很好处理了。

也不好处理，没有标尺，以哪个为准：

 

以姓名为对比标准但有重复，以身份证号码为准，但有错误，系统会把错误的身份证号码认定为另一个新的人员，所以，操作过程的严谨性还是很重要，银行系统的身份证号码录入都还需要人工核对呢。

 

现在唯一的办法，导入后，利用循环，按照表2的身份证号码，到表1中调用其他信息，调不出来的（查不到对应的其他信息的）则通过人工手动修改，表2的其他信息出身份证号码外，其他信息都将被从表1调进来的信息覆盖！

对比EXCEL2中身份证号、姓名是否与EXCEL1一致

条件明确啊。按条件比对，EXCEL2错不关狐表的事。

可以做到,只要有一组数据是正确的,对比两组不同就算是有错了,我已做好了,我的办法是将两组EXCEL"表数据加截到狐表同一表中,采用姓名加身份证的办法合并在一列中,一列为正确的,一列为错误的,如果两列数据不等,就在第三列提示有错.

能不能把具体的操作步骤写一下，太笼统了，

我回家后找一下当时做的示例吧

直接比较Excel表也是可以的，将两个表，第一个表和第二个表，身份证号码都在第一列，第一个表正确：
 
Dim Book As New XLS.Book()
Dim Sheet1 As XLS.Sheet = Book.Sheets(0)
Book.Sheets.Add() '增加一个工作表
Dim Sheet2 As XLS.Sheet = Book.Sheets(1) '引用新增加的工作表
For i as integer = 0 To Sheet1.Rows.Count -1
   if Sheet1(i, 0).Text <> Sheet2(i, 0).Text  Then

           Sheet2(i, 1).Value  = "这个错了"
   End if
Next

 

相关知识点：

http://www.foxtable.com/help/topics/1144.htm

http://www.foxtable.com/help/topics/1160.htm

 

 

我看了一下,改了一下贺老师的代码,条件是,两个表的第一列都是姓名列,第二列都是身份证号,并且两张表的顺序都是一样的,使用这段代码,就可以直接在EXCEL表中比对了