在利用Excel處理數據時，我們通長會面對一種情況，就是將兩張工作表進行對比，以便從中找出不同或相同的記錄或數據。此時情況特別適合驗證信息的完整性以及檢驗數據的差異性。下面就為大家講解一下具體的實現方法。
方法/步驟
如果要進行比對的兩個工作表或多個工作表位於不同的文件中，我們首先要做的就是把多個要進行比對的Excel工作表數據複製粘貼到同一個工作簿中，同時做好各個工作表的命名準備，以便能正確的區分數據的來源。
接下來確定數據“關鍵字”部分，即能夠唯一標識記錄的關鍵字組合，這樣就可以在進行數據比對時，能夠唯一的標記一條記錄。比如，如圖所示的“姓名”就可以唯一標識一條記錄。
接下來，我們還要確定一下，各個工作表行的範圍(要對比那些行)以及要進行對比的關鍵字所在的位置信息。如圖可知，表0中數據範圍為“2至37行”，關鍵字所在的位置為（i行4列）。表1中數據範圍為“2至36行”，關鍵字所在的位置為（j行4列）。
在本經驗中，我們所要做的就是從表1中找出表2中已經存在的記錄，並且做好相應的標記，以便供查看。為此，按鍵盤上的快捷組合鍵“Alt+F11”進入VBA編輯模式。或者切換至“開發工具”選項卡，點擊“Visual Basic”按鈕進入VBA環境。
右擊“Microsoft Excel對象”，從彈出的右鍵菜單中選擇“插入”->“模塊”項。
接著輸入如圖所示的代碼：
Sub 數據對比()
Dim i As Integer '聲明i是表0的行
Dim j As Integer '聲明j是表1的行
For i = 2 To 37 '表0數據範圍
For j = 2 To 36 '表1數據範圍
If Sheets("1").Cells(j, 4) = Sheets("0").Cells(i, 4) Then '表0和表1相同列進行對比
Sheets("1").Cells(j, 1) = "相同" '存在時在第1行進行標記
End If '結束if
Next j
Next i
End Sub
注意：表0對應的是i，表1對應的是j
然後點擊工具欄上的“調試運行”按鈕。
待子過程運行結束後，返回Excel工作表進行查看，就會發現對比結果已啦。基於此，我們可以進行更近一步的數據處理操作。
