如何清除（不删除）找到的重复值的最后一个重复单元格（不是行）？答案

【问题标题】：How to clear (not delete) the last duplicate cell (not row) for the duplicate values found?如何清除（不删除）找到的重复值的最后一个重复单元格（不是行）？
【发布时间】：2017-06-10 04:11:09
【问题描述】：

我有一个排好序的列：

**NAMES**
Amit
Amit
Amit
Jack
Jack
Jack
Jack

我想清除（而不是删除）找到的重复值的最后一个重复单元格（不是行）。

在上面的例子中，第三个 Amit 和第四个 Jack 将从单元格中被清除。

我发现许多宏/VBA 可以清除重复项，但没有一个只清除最后一个重复值。

【问题讨论】：

到目前为止你尝试过什么代码？如果您将其粘贴到问题中，并告诉我们哪个位未按预期工作，我们可以帮助您解决您遇到的任何问题。
如果没有提供尝试，并且尽管被询问，但没有进行尝试和编辑，这个问题可能会因为太宽泛而被关闭。

标签： excel vba duplicates

【解决方案1】：

也许这会有所帮助：

For Each cell In Application.Intersect(InsertNameOfTableHere.UsedRange.Offset(1, 0), InsertNameOfTableHere.Columns(1))
    If cell = cell.Offset(-1, 0) And cell <> cell.Offset(1, 0) Then
        cell.Value = ""
    End If
Next

【讨论】：