VBA比较多张图纸上的多个单元格

我需要一些关于比较多张图纸上的多个单元格和删除重复单元格的帮助。如果表1上的A列和B列与表2上的A列和B列匹配，则我需要删除该行

请帮忙

在上面的示例中，我需要从Sheet2中删除第2行和第4行。

试试这个

Sub DeleteDuplicatesOnSheets()

   Dim Ws As Worksheet
   Dim Cl As Range
   Dim ValU As String
   Dim Qty As Long
   Dim Rng As Range

   For Each Ws In Worksheets

   On Error Resume Next

      With CreateObject("scripting.dictionary")
         For Each Cl In Ws.Range("C2", Ws.Range("C" & Rows.Count).End(xlUp))
            ValU = Join(Application.Transpose(Application.Transpose(Cl.Resize(, 4))))
            If Not .exists(ValU) Then
               .Add ValU, Nothing
            Else
               Qty = Qty + 1
               If Rng Is Nothing Then
                  Set Rng = Cl
               Else
                  Set Rng = Union(Rng, Cl)
               End If
            End If
         Next Cl
         If Not Rng Is Nothing Then Rng.EntireRow.Delete
         .RemoveAll
      End With
   Next Ws
   MsgBox Qty & " rows have been deleted"

End Sub

---

到目前为止你试过什么？