如何在Excel中刪除重複的行，但保留具有最新日期的那一行？

我有一個數據範圍，在A列中包含一些重複值，而在B列中則填有一些日期。現在，我需要刪除A列中的重複行，但要保留對應B列中的最新日期，如下方截圖所示。您有什麼好辦法可以快速輕鬆地在Excel中解決這個問題嗎？

使用VBA代碼刪除重複值並保留另一列中的最近日期

使用Kutools for Excel刪除重複值並保留另一列中的最近日期

使用VBA代碼刪除重複值並保留另一列中的最近日期

以下VBA代碼可能有助於您刪除重複的單元格並保留另一列中的最新日期，請按照以下步驟操作：

1. 按住ALT + F11鍵，打開Microsoft Visual Basic for Applications窗口。

2. 點擊插入 > 模組，然後將以下宏粘貼到 模組窗口中。

VBA代碼：刪除重複值並保留最近的日期

Sub test()
'updateby Extendoffice 
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count < 2) Or (xRng.Rows.Count < 2) Then
        MsgBox "the used range is invalid", , "Kutools for Excel"
        Exit Sub
    End If
    xRng.Sort key1:=xRng.Cells(1, 1), Order1:=xlAscending, key2:=xRng.Cells(1, 2), Order2:=xlDescending, Header:=xlGuess
    xRng.RemoveDuplicates Columns:=1, Header:=xlGuess
End Sub

3. 然後按F5鍵執行此代碼，會彈出一個提示框提醒您選擇要使用的數據範圍，請參見截圖：

4. 然後點擊確定，A列中的重複值已被刪除，並且保留了B列中的最新日期。請參見截圖：

注意：為了成功應用上述代碼，包含重複值的列必須位於日期列的左側。

使用Kutools for Excel刪除重複值並保留另一列中的最近日期

如果您不熟悉代碼，請不要擔心，功能強大的工具——Kutools for Excel的高級合併行功能可以幫助您輕鬆完成此任務。

安裝Kutools for Excel後，請按照以下步驟操作：

1. 選擇要刪除重複項並保留另一列中最近日期的數據範圍。

2. 然後點擊Kutools > 合併與分割 > 高級合併行，請參見截圖：

3. 在根據列合併行對話框中，點擊要刪除重複值的列名，然後點擊主鍵，請參見截圖：

4. 繼續點擊要保留最近日期的另一列名，然後點擊計算 > 最大值，請參見截圖：

5. 然後點擊確定按鈕關閉此對話框，現在，您可以看到A列中的重複名稱已被刪除，並且只保留了對應B列中的最新日期，請參見截圖：

演示：使用Kutools for Excel刪除重複值並保留另一列中的最近日期