比较工作表中单元格中的值以在不同工作表中的不同列中找到相同的值

Question

如果第1列和第2列中的值在A和B列中相同，则复制第3列的对应值并粘贴在C列中。删除重复项然后粘贴值。

Sub copyCurrentStatus()
    Dim i As Long
    Dim LastRow As Long

    LastRow = Cells(Rows.Count, 2).End(xlUp).Row
        For i = LastRow To 2 Step -1

            'If Worksheets("Sending List").Range("C:C").Value = Worksheets("P13 D-Chain Status").Range("A:A").Value Then
             If Worksheets("Sending List").Cells(i, 1).Value = Worksheets("P13 D-Chain Status").Range("i,1").Value Then

               'Copy Sales Organization
                Rows(i).Copy
                Worksheets("Sending List").Range("D:D").PasteSpecial

            End If
        Next i
End Sub