Excel 如何删除B列中具有相同值的整行

我只是想知道，如果B列中有两行的值相同，您将如何删除整行。比如说

|   A   |    B    |
   keep    20222
  delete   123456
   keep    20223
  delete   123456

---

假设您有来自A1的数据

此代码将删除重复项

Sub Macro1()
Range("A1").CurrentRegion.RemoveDuplicates Columns:=Array(1, 2), Header:=xlNo ' if you have header change xlno to xlyes
End Sub

尝试一下：

Sub dural()
    Dim N As Long, i As Long, rDel As Range
    Dim wf As WorksheetFunction
    Set wf = Application.WorksheetFunction
    N = Cells(Rows.Count, "B").End(xlUp).Row
    Set rDel = Nothing
    For i = 1 To N
        v = Cells(i, "B").Value
        If wf.CountIf(Range("B:B"), v) > 1 Then
            If rDel Is Nothing Then
                Set rDel = Cells(i, "B")
            Else
                Set rDel = Union(rDel, Cells(i, "B"))
            End If
        End If
    Next i

    If rDel Is Nothing Then
    Else
        rDel.EntireRow.Delete
    End If
End Sub

---

请参阅此链接：这不会有帮助，因为我正在使用Excel 97。工作不想升级这种事情没有VBA很容易做到。您能否提供更多有关您的流程是什么、需要完成什么以及频率的详细信息？我们从网站加载excel表格，不确定其中是否有重复项。这些数字将是我们拥有的工单，我们需要删除重复的工单。我们正在保存那些必须与其他组处理的数据，当我们加载新的excel工作表时，我们会粘贴那些尚未完成的数据，并希望删除与它们匹配的数据。我们只看到B列中的信息，我们想删除整行。