Note: The other languages of the website are Google-translated. Back to English

如何删除重复项,但保留Excel中其余的行值?

在Excel中,当您应用“删除重复项”功能时,它将删除所有重复值并向上移动,如屏幕截图1所示。 但是,在某些情况下,您可能希望删除重复项,但保留其余的行值,如屏幕截图2所示。 现在,在这种情况下,我将介绍一些删除重复项但将其余部分保留在Excel中的技巧。

doc删除重复项以保持休息1 doc删除重复项以保持休息2

删除重复项,但使用过滤器保留其余的行值(3个步骤)

删除重复项,但使用VBA保留其余的行值(4个步骤)

删除重复项,但使用Kutools for Excel保留其余的行值(2个步骤)好主意3


删除重复项,但使用过滤器保留其余行值

使用公式和过滤器功能,您可以快速删除重复项,但要保持休息。

1.在数据范围(例如,D2)旁边选择一个空白单元格,键入公式 = A3 = A2,将自动填充手柄向下拖动到所需的单元格。 看截图:
doc删除重复项以保持休息3

2.选择所有数据范围,包括公式单元格,然后单击 数据 > 筛选器 启用 筛选器 功能。 看截图:
doc删除重复项以保持休息4

3。 点击 筛选器图标 在D列(公式列)中,然后检查 TUR从下拉列表E中查看屏幕截图:
doc删除重复项以保持休息5

4。 点击 OK,然后列出所有重复项,然后选择所有重复值,按 删除 删除它们的关键。 看截图:
doc删除重复项以保持休息6

5。 点击 数据 > 筛选器 禁用 筛选器,然后根据需要删除公式。 您可以看到所有重复项均已删除,其余值保留在该行中。
doc删除重复项以保持休息7


删除重复项,但使用VBA保留其余的行值

在Excel中,有一个VBA代码,该代码也可以删除重复项,但保留其余的行值。

1。 按 Alt + F11键 显示键 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > e,然后将以下代码粘贴到 模块.

VBA:删除重复项,但保留其余行值

Sub RemoveDuplicates()
'UpdatebyExtendoffice20160918

    Dim xRow As Long
    Dim xCol As Long
    Dim xrg As Range
    Dim xl As Long
    On Error Resume Next
    Set xrg = Application.InputBox("Select a range:", "Kutools for Excel", _
                                    ActiveWindow.RangeSelection.AddressLocal, , , , , 8)

    xRow = xrg.Rows.Count + xrg.Row - 1
    xCol = xrg.Column
    'MsgBox xRow & ":" & xCol
    Application.ScreenUpdating = False
    For xl = xRow To 2 Step -1
        If Cells(xl, xCol) = Cells(xl - 1, xCol) Then
            Cells(xl, xCol) = ""
        End If
    Next xl
    Application.ScreenUpdating = True
    
End Sub

doc删除重复项以保持休息8

3。 按 F5 键运行代码,会弹出一个对话框,提醒您选择一个范围以从中删除重复的值。 看截图:
doc删除重复项以保持休息9

4。 点击 OK,现在已从选择中删除重复的值,并保留空白单元格。
doc删除重复项以保持休息10


删除重复项,但使用Kutools for Excel保留其余的行值

如果你有 Kutools 为 Excel –安装了方便且功能强大的添加工具,您可以通过两种方式快速删除重复项,但保留剩余值或行值。

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

安装后 Kutools for Excel,请执行以下操作:(立即免费下载Kutools for Excel!)

方法1:合并相同的单元格(2个步骤)

1.选择重复的值,然后单击 库工具 > 合并与拆分 > 合并相同的单元格。 看截图:
doc删除重复项以保持休息11

2.然后,重复值已合并到一个单元格中。 然后点击 主页 > 合并与中心 > 取消单元格拆分。 看截图:
doc删除重复项以保持休息12

现在结果显示如下:
doc删除重复项以保持休息13

方法2:选择重复和唯一单元格(4个步骤)

1.选择要从中删除重复项的数据列表,然后单击 库工具 > 选择 > 选择重复和唯一单元格。 看截图:
doc删除重复项以保持休息14

2。 在里面 选择重复和唯一单元格 对话框,检查 重复(第一个除外) 在选项 部分。 看截图:
doc删除重复项以保持休息15

3。 点击 Ok,会弹出一个对话框,提醒您选择了多少个重复项,然后单击 OK 关闭它。 看截图:
doc删除重复项以保持休息16

4.然后按 删除 键以删除选定的重复值。

doc删除重复项以保持休息17

提示:Kutools for Excel高级组合行 实用程序,您可以合并重复的值,然后在另一列上进行一些计算,如下图所示。 它在30天内无限制地提供完整功能,请下载并立即免费试用。
doc删除重复项以保持休息18


最佳办公效率工具

Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%

  • 重用: 快速插入 复杂的公式,图表 以及您以前使用过的任何东西; 加密单元 带密码 创建邮件列表 并发送电子邮件...
  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围...
  • 合并单元格/行/列 不会丢失数据; 拆分单元格内容; 合并重复的行/列...防止细胞重复; 比较范围...
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择...
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等...
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换...
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体...
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF...
  • 超过300种强大功能。 支持Office / Excel 2007-2019和365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能30天免费试用。 60天退款保证。
kte选项卡201905

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

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
officetab底部
按评论排序
注释 (14)
还没有评分。 成为第一位评论!
该评论由网站上的主持人最小化
感谢您提供本教程,它使我免于删除重复项的大量工作。
该评论由网站上的主持人最小化
在第一种方法中,您可以使用 =A3=A2 代替 =A2=A1 来保留第一个实例并删除其余重复项。
该评论由网站上的主持人最小化
谢谢你的评论! 正是我想要的!
该评论由网站上的主持人最小化
是的,它有效
该评论由网站上的主持人最小化
是否可以在没有 Kutools 插件的情况下合并类似的单元格?
该评论由网站上的主持人最小化
该评论由网站上的主持人最小化
真/假解决方案是一个聪明的技巧。 谢谢
该评论由网站上的主持人最小化
真假真的有帮助!
该评论由网站上的主持人最小化
我会使用公式 =A3<>A2 (不等于 ),以便它显示在顶部与底部的最后一个。
该评论由网站上的主持人最小化
我尝试了公式=A1=A2,它也得到了相同的结果显示在顶部
该评论由网站上的主持人最小化
我尝试了公式=A2=A1,它也得到了显示在顶部的结果。
该评论由网站上的主持人最小化
非常感谢! 这很有帮助!!
该评论由网站上的主持人最小化
经过长时间的搜索,它对我有帮助,谢谢兄弟
该评论由网站上的主持人最小化
信息非常有用。节省了很多时间

谢谢。
这里还没有评论
留下你的意见
以访客身份发帖
×
评价此帖子:
0   产品特性
建议地点