你如果有兴趣的话,可以用EXCEL的VBA来完成,速度很快,方法如下:1、打开数据所在的工作表,按ALT+F11,打开Microsoft Visual Basic编辑器,在“插入”菜单中选择“模块”;2、复制以下代码,并粘贴到右上角的代码窗口(在立即窗口上面):Sub aa()Dim arr(), i%, j%, n%i = Cells(Rows.Count, 1).End(xlUp).RowFor j = 1 To i
If Cells(j, 1) = Cells(j + 2, 2) And Cells(j + 1, 4) = Cells(j + 2, 5) Then
n = n + 1
...
|