步骤1:打开excel,创建sheet 表1,把内容粘贴到表1。(粘贴的时候可以点击右键“选择性粘贴”,只粘贴数据)创建sheet 表2,把内容粘贴到表2.
步骤2:Alt+F11进入VBA环境,右键点击Microsoft Excel,点击创建插入–》模块
步骤3:粘贴代码
Sub 数据对比()
Dim i As Integer
Dim j As Integer
For i = 1 To 280 '备注:表2,对比表21的第1行到第280行
For j = 1 To 280 '备注:表1,对比表10的第1行到第280行
If Sheets("表2").Cells(i, 1) = Sheets("表1").Cells(j, 1) Then '对比表1和表2第1列的数据
If Sheets("表2").Cells(i, 2) = Sheets("表1").Cells(j, 2) Then '对比表1和表2第2列的数据
Sheets("表2").Cells(i, 8) = "相等" '表1和表2的数据相等时,在表2的第8列标记相等
End If
End If
Next j
Next i
End Sub