excel怎么删除不重复的

要删除Excel中的不重复项，可以使用高级筛选、条件格式、辅助列等方法。以下是详细步骤：

高级筛选：通过使用高级筛选功能，可以快速筛选出不重复的数据并将其删除。
条件格式：利用条件格式来标记不重复的数据，然后手动删除这些标记的数据。
辅助列：创建一个辅助列，通过公式来标记不重复的数据，再进行删除操作。

高级筛选是其中较为简单且高效的方法。下面将详细介绍如何使用高级筛选功能来删除Excel中的不重复项。

一、使用高级筛选删除不重复项

1.1 打开高级筛选功能

在Excel中，点击“数据”选项卡，然后在“排序和筛选”组中找到“高级”按钮并点击它。此时会弹出“高级筛选”对话框。

1.2 设置筛选条件

在“高级筛选”对话框中，选择“将筛选结果复制到其他位置”，然后设置列表区域和复制到的位置。列表区域是包含数据的范围，复制到的位置是你希望将筛选结果复制到的单元格。

1.3 选择唯一记录

勾选“选择唯一记录”选项，这样Excel会筛选出不重复的数据并将其复制到指定位置。点击“确定”按钮，Excel会自动完成筛选。

1.4 删除原始数据

现在，原始数据中不重复的项已经被筛选出来，你可以删除原始数据中的所有项，然后将筛选结果复制回原始位置。

二、使用条件格式删除不重复项

2.1 标记不重复项

首先，选择包含数据的列，然后点击“开始”选项卡中的“条件格式”，选择“新建规则”。在弹出的对话框中，选择“使用公式确定要设置格式的单元格”。

2.2 输入公式

在公式框中输入公式 =COUNTIF(A:A, A1)=1，其中A:A是数据所在的列，A1是起始单元格。这个公式的意思是，如果某个单元格在整个列中只出现一次，那么就给它应用条件格式。

2.3 设置格式

点击“格式”按钮，选择一种醒目的格式，比如红色填充。点击“确定”返回到工作表，此时不重复的项会被标记为红色。

2.4 删除标记项

手动选择所有红色标记的单元格，然后右键选择“删除”或按“Delete”键删除这些数据。

三、使用辅助列删除不重复项

3.1 创建辅助列

在数据旁边插入一个新列，作为辅助列。假设数据在A列，辅助列为B列。

3.2 输入公式

在辅助列的第一个单元格输入公式 =COUNTIF(A:A, A1)，然后向下拖动填充公式。这个公式会计算每个单元格在整个列中出现的次数。

3.3 筛选不重复项

在辅助列中，筛选出值为1的单元格，这些单元格对应的就是不重复项。选择这些行，然后删除它们。

3.4 删除辅助列

完成删除操作后，可以删除辅助列，恢复原始表格的布局。

四、Excel VBA脚本删除不重复项

对于高级用户，使用VBA脚本可以实现更加灵活和自动化的操作。以下是一个简单的VBA脚本示例，用于删除不重复项：

Sub DeleteNonDuplicates()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1")
    Dim lastRow As Long
    lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    Dim rng As Range
    Set rng = ws.Range("A1:A" & lastRow)
    Dim cell As Range
    For Each cell In rng
        If Application.WorksheetFunction.CountIf(rng, cell.Value) = 1 Then
            cell.ClearContents
        End If
    Next cell
    '删除空白行
    rng.SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

4.1 打开VBA编辑器

按 Alt + F11 打开VBA编辑器，然后在左侧的工程窗口中选择你的工作簿，右键选择“插入”，然后选择“模块”。

4.2 粘贴脚本

将上述VBA脚本粘贴到模块窗口中。这个脚本会遍历A列中的所有单元格，如果某个单元格在列中只出现一次，就会清除它的内容。最后，脚本会删除所有空白行。

4.3 运行脚本

关闭VBA编辑器，返回Excel，按 Alt + F8 打开宏对话框，选择你刚刚创建的宏，然后点击“运行”。

五、总结

通过使用高级筛选、条件格式、辅助列和VBA脚本等方法，你可以在Excel中有效地删除不重复的项。高级筛选功能是最直观和快速的方法，适合大多数用户。而条件格式和辅助列方法提供了更高的灵活性，适合需要对数据进行复杂操作的用户。对于有编程经验的用户，使用VBA脚本可以实现自动化操作，提高效率。