Fatal编程技术网
  • excel/
  • Excel 比较工作表中单元格中的值，以在不同工作表的不同列中找到相同的值

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

excel vba

Excel 比较工作表中单元格中的值，以在不同工作表的不同列中找到相同的值,excel,vba,Excel,Vba,如果第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").Ra

如果第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
您需要限定
行（i）
所在的工作表。具体应该粘贴在哪里（为什么有
D:D
？），然后使用
单元格
而不是
范围（“i，1”）
中的
.Range
（并丢失引号）。我想将其粘贴到另一张表中的D列。你能帮我写代码吗，他们是你理解问题的方式？？谢谢