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

Hogyan lehet eltávolítani az ismétlődő sorokat, de megtartani a legfrissebb dátumot az Excelben?

doc duplikátumok eltávolítása a legutóbbi 1

Van egy olyan adattartományom, amely tartalmaz néhány ismétlődő értéket az A oszlopban, és a B oszlopban szerepel néhány dátum, most el kell távolítanom az A oszlop ismétlődő sorait, de meg kell tartanom a legújabb dátumot a megfelelő B oszlopból, az alábbi képernyőkép szerint , van valami jó ötlete a probléma gyors és egyszerű megoldására az Excel programban?

Távolítsa el az ismétlődő értékeket, és tartsa a legfrissebb dátumot egy másik oszlopban, VBA-kóddal

Távolítsa el az ismétlődő értékeket, és tartsa a legfrissebb dátumot egy másik oszlopban a Kutools for Excel alkalmazással


Távolítsa el az ismétlődő értékeket, és tartsa a legfrissebb dátumot egy másik oszlopban, VBA-kóddal

A következő VBA-kód segíthet az ismétlődő cellák eltávolításában és a legutóbbi dátum megtartásában egy másik oszlopból, kérjük, tegye a következőket:

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, majd illessze be a következő makrót a Modulok Ablak.

VBA kód: Távolítsa el az ismétlődő értékeket, és őrizze meg a legfrissebb dátumot

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. Ezután nyomja meg a gombot F5 kulcs a kód végrehajtásához, és megjelenik egy felszólító mező, amely emlékezteti Önt a használni kívánt adattartomány kiválasztására, lásd a képernyőképet:

doc duplikátumok eltávolítása a legutóbbi 2

4. Kattintson a gombra OK, az A oszlop ismétlődő értékeit eltávolítottuk, és a B oszlop legújabb dátumát a szükség szerint megtartottuk. Lásd a képernyőképet:

doc duplikátumok eltávolítása a legutóbbi 3

Megjegyzések: A fenti kód sikeres alkalmazásához az ismétlődő értékeket tartalmazó oszlopnak a dátum oszlop bal oldalán kell elhelyezkednie.


Távolítsa el az ismétlődő értékeket, és tartsa a legfrissebb dátumot egy másik oszlopban a Kutools for Excel alkalmazással

Ha még nem ismeri a kódot, kérjük, ne aggódjon, a hatékony segédprogram- Haladó kombinált sorok of Kutools az Excel számára segíthet könnyedén megoldani ezt a feladatot.

Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. 

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Válassza ki azt az adattartományt, amelyből el kívánja távolítani a duplikátumokat, és tartsa meg a legutóbbi dátumot egy másik oszlopból.

2. Ezután kattintson Kutools > Egyesítés és felosztás > Haladó kombinált sorok, lásd a képernyőképet:

3. Az Kombinálja a sorokat az oszlop alapján párbeszédpanelen kattintson az oszlop nevére, amelyről el szeretné távolítani az ismétlődő értékeket, majd kattintson a gombra Elsődleges kulcs, lásd a képernyőképet:

doc duplikátumok eltávolítása a legutóbbi 5

4. Kattintson egy másik oszlop nevére, amelyet meg szeretne tartani a legfrissebb dátummal, majd kattintson a gombra Számít > max, lásd a képernyőképet:

doc duplikátumok eltávolítása a legutóbbi 6

5. Kattintson a gombra Ok gombra kattintva bezárhatja ezt a párbeszédpanelt, és most láthatja, hogy az A oszlopban található duplikált nevek eltávolításra kerültek, és csak a megfelelő B oszlopban tartja meg a legújabb dátumot, lásd a képernyőképet:

doc duplikátumok eltávolítása a legutóbbi 7

Töltse le és ingyenes próbaverziót Kutools for Excel Now!


Bemutató: Távolítsa el az ismétlődő értékeket, és tartsa a legfrissebb dátumot egy másik oszlopban a Kutools for Excel alkalmazással

Kutools az Excel számára: több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. Töltse le és ingyenes próbaverziót most!

A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
A megjegyzések rendezése szerint
Hozzászólások (3)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Ez rendkívül hasznos volt! Köszönöm szépen!
A weboldal moderátora ezt a megjegyzést minimalizálta
Helló
A ver si me pueden ayudar con lo siguiente.

Tengo una columna con fechas de ingreso de material, otra con los materiales que se van repitiendo en la tabla y otra con el numero del documento de despacho.

Necesito que para un mismo numero de documento de despacho o bien, de fecha, no se duplique el material. Sin embargo en la columna de materiales se deben los materiales, pero no deben duplicarse para la misma fecha o bien para el mismo numero de documento.

Szüksége van makróra?

Adjunto tabla tipo.




Köszönöm!
A weboldal moderátora ezt a megjegyzést minimalizálta
Hola A ver si me pueden ayudar con lo siguiente. Tengo una columna con fechas de ingreso de material, otra con los materiales que se van repitiendo y otra columna con el numero del documento de despacho. Necesito que para un mismo numero de documento de despacho o bien, de fecha, no se duplique el material. Sin embargo en la columna de materiales se deben repetir los materiales, pero no deben duplicarse para la misma fecha o bien para el mismo numero de documento. Szüksége van makróra?
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi