跳到主要内容

如何删除所有重复项,但在Excel中仅保留一个?

本教程介绍了从列表中删除所有重复值,但在Excel中仅保留一个重复值的技巧,请阅读详细信息:

删除所有重复项,但仅使用删除重复项功能保留一个

删除所有重复项,但仅使用VBA保留一个

删除所有重复项,但仅使用 Kutools for Excel 保留一个 好主意3

合并所有重复行并使用 Kutools for Excel 保留数据 好主意3


在Excel中,“删除重复项”功能可以帮助您删除所有重复项,但保留一个重复值。

1.选择所需的数据列表,然后单击 时间 > 删除重复。 看截图:

doc删除重复保留一个1

2.然后在 删除重复 对话框中,检查要从中删除重复项的列名,如果数据中包含标题,请检查 我的数据有标题 选项。 看截图:

doc删除重复保留一个2

3。 点击 OK。 然后会弹出一个对话框,告诉您已删除了多少重复项,只需将其关闭即可。 现在,所有重复项均已删除,但列表中仅保留一个。

doc删除重复保留一个3


如果您对VBA感兴趣,在这里我还可以介绍VBA代码来解决此任务。

1。 按 Alt + F11 同时打开钥匙 Microsoft Visual Basic应用程序的窗口。

2。 点击 插页 > 模块,然后在VBA下面粘贴到新 模块 窗口。

VBA:删除所有重复项,但保留一个。

Sub RemoveAllDeplicateButOne()
    Dim LR As Long: LR = Range("A" & Rows.Count).End(xlUp).Row
    ActiveSheet.Range("A1:A" & LR).RemoveDuplicates Columns:=1, Header:=Name
End Sub

3。 按 F5 键或单击 运行 执行VBA,A列中列表中的重复项已被删除,但保留其中一个。

提示: 在上面的VBA中,A表示列A,A1:A表示列表范围,您可以根据需要进行更改。


有一个强大的工具 Kutools for Excel 命名 选择重复和唯一单元格 可以快速选择或突出显示除第一个以外的所有重复项,然后可以将其删除。

Kutools for Excel, 与超过 300 方便的功能,使您的工作更加轻松。 

免费安装 Kutools for Excel,请执行以下操作:

1.选择数据范围,然后单击 库工具 > 选择 > 选择重复和唯一单元格。 看截图:

doc删除重复项保留15

2.在显示的对话框中,检查 重复(第一个除外) 选项,然后单击 Ok。 看截图:

doc删除重复保留一个5

3.然后弹出一个对话框,提醒您所选单元格的数量。 然后点击 OK 关闭它。 看截图:

doc删除重复保留一个6

4.然后选择除第一个以外的所有重复项,然后按 删除 清除它们的关键。

doc删除重复保留一个7

提示: 您也可以删除所有重复项,但保留一个 选择重复和唯一单元格 喜欢这个:

选择所有唯一的值(包括第一个重复项),然后按来复制它们 按Ctrl + C 并粘贴到另一个位置 按Ctrl + V.

doc删除重复保留一个8doc删除重复保留一个9

如果您有一些数据,并且想要合并重复的行,那么保留相应的数据,如下图所示,您可以使用 Kutools for Excel高级组合行 功能。

doc删除重复保留一个10

免费安装 Kutools for Excel,请执行以下操作:

1.选择数据,然后单击 库工具 > 合并与拆分 > 高级组合行。 看截图:

doc删除重复项保留16

2.在 根据列合并行 对话框中,选择要从中删除重复项的列,然后单击 首要的关键 使其成为主键列。 看截图:

doc删除重复保留一个12

3.然后选择您只想保留数据的列,然后单击 结合,然后从列表中选择一个定界符。 看截图:

doc删除重复保留一个13

4。 点击 Ok,重复的行将合并并保留相应的数据。

doc删除重复保留一个14


相关文章:

最佳办公生产力工具

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...

产品描述


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations