Jak odstranit duplicitní řádky, ale zachovat ten s nejnovějším datem v aplikaci Excel?
Mám řadu dat, která obsahuje některé duplicitní hodnoty ve sloupci A a ve sloupci B je naplněn nějakým datem, nyní musím odstranit duplicitní řádky ve sloupci A, ale ponechat nejnovější datum z odpovídajícího sloupce B jako následující snímek obrazovky , máte nějaké dobré nápady, jak tento problém rychle a snadno vyřešit v aplikaci Excel?
Odstraňte duplicitní hodnoty a ponechejte nejnovější datum v jiném sloupci s kódem VBA
Odstraňte duplicitní hodnoty a udržujte nejnovější datum v jiném sloupci pomocí Kutools pro Excel
Odstraňte duplicitní hodnoty a ponechejte nejnovější datum v jiném sloupci s kódem VBA
Následující kód VBA vám může pomoci odstranit duplicitní buňky a uchovat si nejnovější datum z jiného sloupce, postupujte takto:
1. Podržte ALT + F11 klíče a otevře se Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula poté vložte následující makro do souboru Modul Okno.
Kód VBA: Odstraňte duplicitní hodnoty a uchovejte nejnovější datum
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. Pak stiskněte tlačítko F5 klíč k provedení tohoto kódu a zobrazí se okno s výzvou, které vám připomene výběr rozsahu dat, který chcete použít, viz screenshot:
4. A pak klikněte na tlačítko OK, duplicitní hodnoty ve sloupci A byly odstraněny a poslední datum ve sloupci B je uchováno podle potřeby. Viz snímek obrazovky:
Poznámka: Chcete-li úspěšně použít výše uvedený kód, sloupec obsahuje duplicitní hodnoty, musí být umístěn vlevo od sloupce data.
Odstraňte duplicitní hodnoty a udržujte nejnovější datum v jiném sloupci pomocí Kutools pro Excel
Pokud nejste obeznámeni s kódem, nebojte se, výkonná utilita- Pokročilé kombinování řádků of Kutools pro Excel vám může pomoci tento úkol snadno vyřešit.
Kutools pro Excel : s více než 300 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů. |
Po instalaci Kutools pro Excel, postupujte následovně:
1. Vyberte rozsah dat, který chcete odstranit duplikáty, a ponechat nejnovější datum z jiného sloupce.
2. Pak klikněte na tlačítko Kutools > Sloučit a rozdělit > Pokročilé kombinování řádků, viz screenshot:
3. V Kombinujte řádky na základě sloupce V dialogovém okně klikněte na název sloupce, ze kterého chcete odstranit duplicitní hodnoty, a klikněte na Primární klíč, viz screenshot:
4. Klikněte na název jiného sloupce, u kterého chcete zachovat poslední datum, a poté klikněte na Vypočítaná > Max, viz screenshot:
5. A pak klikněte na tlačítko Ok Tlačítko zavřete toto dialogové okno a nyní můžete vidět, že duplicitní názvy ve sloupci A byly odstraněny a ponechat pouze nejnovější datum v odpovídajícím sloupci B, viz screenshot:
Stáhněte si zdarma zkušební verzi Kutools pro Excel!
Ukázka: Odeberte duplicitní hodnoty a ponechejte nejnovější datum v jiném sloupci pomocí programu Kutools pro Excel
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!