excel行列相符問題?

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Dim i As Integer
For i = 3 To 400
If Target.AddressLocal = "$B$" & i And Cells(i, 2) = Sheet2.Cells(i, 1) Then
Cells(i, 3) = Cells(i, 1)
End If
Next
End Sub
(i, 2)和Sheet2.Cells(i, 1)必需在同一行,請問怎麼寫才能就算不同行,一樣抓的到?謝謝