检查两个单独的行是否在多列中具有重复项然后执行操作（VBA）

Question

我有一个房地产属性地址数据库，其中的列包含有关建筑物的不同信息，例如平方英尺和房产类型，以及所有者姓名和电话号码。一些条目是完全重复的，这意味着两个不同的行在所有单元格中具有完全相同的数据。

某些条目具有所有相同的条目，但两个条目的建筑面积不同。在这种情况下，我想使用VBA检查重复的地址，如果匹配，我想再次检查，看看它们对应的平方英尺是否相同。

如果地址和平方英尺都相同，那么我想完全删除其中一个条目。如果地址相同且平方英尺不同，我想将条目的两个平方英尺一起添加并删除其中一个。

以下是我一直在处理的代码。我不知道从哪里开始：

Private Sub CommandButton1_Click()
Dim Range1 As Range
Set Range1 = Range("A1:J4")
For i = 1 To i = 4
For j = 1 To j = 4
If Cells(i, 3) = Cells(j, 3) And Cells(i, 5) <> Cells(j, 5) Then
Cells(i, 5).Value = Cells(i, 5).Value + Cells(j, 5).Value
Rows(j).EntireRow.Delete

End If

If Cells(i, 3) = Cells(j, 3) And Cells(i, 5) = Cells(j, 5) Then
Rows(j).EntireRow.Delete

End If

End Sub

由于