Excel：如果这些行中的某些条目仅在一列中重复，如何删除几整行？-解网

问：

我有千分之一行和几列的电子表格。我想删除所有行，但一个初始行除外，该行在某个指定列中有重复的值。

例如：下面我有 3 列和 7 行。我想删除所有实例，除了第一个实例，从“电子表格的底部向上”开始计算，第 1 列包含相同文本的行。在这种情况下，应删除第 1 行（因为第 1 行和第 2 行在第 1 列中都有“aa”），第 5 行和第 6 行也应该删除（因为第 5、6 和 7 行在第 1 列中有“cd”）。

所以最后我应该只剩下：第 2、3、4、7 行。

我正在使用 Excel、Windows 10。请注意，我是一个彻头彻尾的 Excel 菜鸟，所以我真的需要最简单的解决方案。我不知道该怎么做，在谷歌上搜索各种解决方案令人困惑。请原谅我的回答中缺少官方电子表格术语。我将非常感谢您的帮助。谢谢。

aa   alex   jones
aa   tom    graham
ab   scott  paul
ba   scott  williams
cd   amy    wiggins
cd   amy    wilson
cd   frank  spencer

excel 公式

如果您使用公式在名称旁边再放一列，该公式指向具有“aa”等值的列，然后说 =IF（E6=E7,0,1），那么如果该值是您要保留的值，它将放置一个 1，如果它是一个需要删除的值，它将放置一个 0。然后，您可以按此列进行筛选并删除不需要的值。下图显示我让它起作用了：

Sub UniqueFromBottom()

    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")

    Dim i As Long
    For i = Range("A" & Rows.count).End(xlUp).Row To 1 Step -1
        If Not dict.exists(Range("A" & i).Value2) Then
            dict.Add Range("A" & i).Value2, ""
        Else
            Range("A" & i).EntireRow.Delete
        End If
    Next i

End Sub

Excel：如果这些行中的某些条目仅在一列中重复，如何删除几整行？

Excel: How to delete several entire rows if some entries in these rows are duplicated only in ONE column?

评论

评论

评论