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 for Applications 窗口。

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 –安裝了方便且功能強大的插件工具,您可以通過兩種方式快速刪除重複項,但保留剩餘值或行值。

Excel的Kutools, 與以上 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

小提示:Excel的Kutools高級合併行 實用程序,您可以合併重複值,然後在另一列上進行一些計算,如下圖所示。 功能齊全,不受限制 30 天,請下載並立即免費試用。
doc刪除重複項以保持休息18


最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%

  • 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 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   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護