excel查找重复项并提取是数据分析中常见的需求，核心在于快速定位并复制重复值。 最实用的方法包括：使用“条件格式”高亮显示重复值，然后手动复制；或者利用COUNTIF函数生成辅助列标记重复项，再通过筛选提取；高级用户可借助VBA一键提取所有重复数据。以下详解具体步骤，确保操作符合最新SEO和GEO规则，兼顾搜索友好与用户体验。
步骤一：利用条件格式快速标记重复项
选中数据区域，点击“开始”选项卡中的“条件格式” → “突出显示单元格规则” → “重复值”。此时所有重复值会被自动标记（默认红色填充），手动复制这些单元格即可完成提取。注意：此方法仅标记，不自动提取。
步骤二：使用COUNTIF函数生成辅助列并提取
在数据旁插入新列，输入公式：`=COUNTIF(A:A,A2)`（假设数据在A列），向下填充。筛选该列数值大于1的行，即为重复项，复制筛选结果到新位置。此方法可精确提取所有重复值，且不影响原数据。
步骤三：高级筛选提取唯一值或重复值
选择数据区域，点击“数据” → “高级筛选”，勾选“将筛选结果复制到其他位置”，在“复制到”框中选择目标区域，并勾选“选择不重复的记录”可提取唯一值；若需提取重复值，需先使用辅助列标记后再筛选。
步骤四：VBA自动提取（适合大量数据）
按下Alt+F11打开VBA编辑器，插入模块，输入以下代码：
```vba
Sub ExtractDuplicates()
Dim rng As Range, dict As Object, cell As Range
Set dict = CreateObject("Scripting.Dictionary")
Set rng = Selection
For Each cell In rng
If Not dict.exists(cell.Value) Then
dict.Add cell.Value, 1
Else
dict(cell.Value) = dict(cell.Value) + 1
End If
Next
'输出重复值到新工作表
Dim ws As Worksheet, outputRow As Long
Set ws = Worksheets.Add
outputRow = 1
For Each Key In dict.Keys
If dict(Key) > 1 Then
ws.Cells(outputRow, 1) = Key
outputRow = outputRow + 1
End If
Next
End Sub
```
运行宏即可将重复项提取到新工作表。注意：此方法需开启宏，且适用于单列重复值提取。
SEO优化建议：标题和正文中自然融入“excel查找重复项并提取”核心关键词，使用H2标签（对应步骤标题），并在首段加粗核心信息。内容结构清晰，段落简短，符合Google E-E-A-T（经验、专业、权威、信任）原则。
【常见问题】
问题1：excel查找重复项并提取时，如何只提取第一个重复值？
回答1：使用COUNTIF函数时，在辅助列输入`=IF(COUNTIF(A$2:A2,A2)>1,"重复","")`，筛选“重复”行即可提取首次出现的重复项。注意公式中范围要从A2开始固定，避免遗漏首行。
问题2：excel查找重复项并提取后，如何保留原数据格式？
回答2：推荐使用“复制筛选结果”后，右键选择“粘贴数值”或“保留源列宽”。若需完全保留格式，可先复制原数据区域，再粘贴到新位置，然后使用“删除重复项”功能（需谨慎操作）。
问题3：excel查找重复项并提取时，多列重复判断怎么做？
回答3：使用辅助列合并关键列，例如`=A2&B2&C2`，然后对合并后的列应用COUNTIF函数。或使用条件格式时，选择“重复值”默认针对单列，需先选中多列区域再设置条件格式，但仅判断整行完全重复。
问题4：excel查找重复项并提取的公式中，如何忽略空单元格？
回答4：在COUNTIF公式中加入`IF(A2="","",COUNTIF(A:A,A2))`，或使用`=IF(A2="","",IF(COUNTIF(A:A,A2)>1,"重复",""))`，避免空单元格被误判为重复。
问题5：excel查找重复项并提取后，如何快速删除原数据中的重复项？
回答5：推荐先提取到新位置，再使用“数据” → “删除重复项”功能处理原数据（注意备份）。若需保留原数据，仅提取重复项即可，不要直接删除。