Przejdź do głównej zawartości

Jak usunąć duplikaty, ale zachować pozostałe wartości wierszy w programie Excel?

W programie Excel usunie wszystkie zduplikowane wartości i przejdzie w górę po zastosowaniu funkcji Usuń duplikaty, jak pokazano na zrzucie ekranu 1. Jednak w niektórych przypadkach możesz chcieć usunąć duplikaty, ale zachowaj pozostałe wartości wierszy, jak pokazano na zrzucie ekranu 2. Teraz w tym przypadku przedstawię kilka sztuczek dotyczących usuwania duplikatów, ale pozostawiam resztę w Excelu.

doc usuń duplikaty zachowaj resztę 1 doc usuń duplikaty zachowaj resztę 2

Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą filtru (3 kroki)

Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą VBA (4 kroki)

Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą Kutools for Excel (Kroki 2)dobry pomysł 3


Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą filtru

Dzięki formule i funkcji Filtruj możesz szybko usunąć duplikaty, ale odpocząć.

1. Wybierz pustą komórkę obok zakresu danych, na przykład D2, wpisz formułę = A3 = A2, przeciągnij uchwyt automatycznego wypełniania w dół do potrzebnych komórek. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 3

2. Zaznacz cały zakres danych, w tym komórkę z formułą, i kliknij Dane > FILTRY umożliwić FILTRY funkcjonować. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 4

3. Kliknij ikonę Ikona filtra w kolumnie D (kolumna z formułą) i sprawdź TurE z rozwijanej listy, zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 5

4. kliknij OK, a następnie listę wszystkich duplikatów i wybierz wszystkie zduplikowane wartości, naciśnij Usuń klucz, aby je usunąć. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 6

5. kliknij Dane > FILTRY wyłączyć FILTRYi usuń formuły według potrzeb. Możesz zobaczyć, że wszystkie duplikaty zostały usunięte, a pozostałe wartości są zachowane w wierszu.
doc usuń duplikaty zachowaj resztę 7


Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą VBA

W programie Excel istnieje kod VBA, który również może usuwać duplikaty, ale zachowuje pozostałe wartości wierszy.

1. naciśnij Alt + F11 klawisze do wyświetlenia Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > modułei wklej poniższy kod do pliku Moduł.

VBA: Usuń duplikaty, ale zachowaj pozostałe wartości wierszy

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 usuń duplikaty zachowaj resztę 8

3. naciśnij F5 aby uruchomić kod, pojawi się okno dialogowe przypominające o wybraniu zakresu, z którego mają zostać usunięte zduplikowane wartości. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 9

4. kliknij OK, teraz zduplikowane wartości zostały usunięte z zaznaczenia i pozostawiono puste komórki.
doc usuń duplikaty zachowaj resztę 10


Usuń duplikaty, ale zachowaj pozostałe wartości wierszy za pomocą Kutools for Excel

Jeśli Kutools dla Excel - zainstalowane poręczne i potężne narzędzie, można szybko usunąć duplikaty, ale zachować resztę lub wartości wierszy na dwa sposoby.

Po zainstalowaniu Kutools dla programu Excel, wykonaj poniższe czynności :(Bezpłatne pobieranie Kutools dla programu Excel teraz!)

Metoda 1 Scal te same komórki (2 kroki)

1. Wybierz zduplikowane wartości, kliknij Kutools > Połącz i podziel > Scal te same komórki. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 11

2. Następnie zduplikowane wartości zostały scalone w jedną komórkę. I kliknij Strona główna > Scal i wyśrodkuj > Rozdziel komórki, aby je podzielić. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 12

Teraz wynik został przedstawiony jako:
doc usuń duplikaty zachowaj resztę 13

Metoda 2 Wybierz zduplikowane i unikalne komórki (4 kroki)

1. Wybierz listę danych, z których chcesz usunąć duplikaty, i kliknij Kutools > Wybierz > Wybierz Zduplikowane i unikalne komórki. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 14

2. w Wybierz Zduplikowane i unikalne komórki okno dialogowe, sprawdź Duplikaty (z wyjątkiem pierwszego) opcja w Zasada Sekcja. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 15

3. kliknij Ok, pojawi się okno dialogowe przypominające o liczbie wybranych duplikatów, kliknij OK zamknąć to. Zobacz zrzut ekranu:
doc usuń duplikaty zachowaj resztę 16

4. Następnie naciśnij Usuń klucz, aby usunąć wybrane zduplikowane wartości.

doc usuń duplikaty zachowaj resztę 17

Wskazówka: w Kutools dla programu Excel'S Zaawansowane wiersze łączenia narzędzie, możesz połączyć zduplikowane wartości, a następnie wykonać obliczenia w innej kolumnie, jak pokazano na zrzucie ekranu. Pełna funkcjonalność bez ograniczeń w ciągu 30 dni,pobierz i wypróbuj teraz bezpłatną wersję próbną.
doc usuń duplikaty zachowaj resztę 18

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (14)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
iNFORMATION IS VERY USEFUL.SAVED A LOT OF TIME

THANKS.
This comment was minimized by the moderator on the site
It help me after long search thank bro
This comment was minimized by the moderator on the site
Thank you so much! This was very helpful!!
This comment was minimized by the moderator on the site
i would use the formula =A3<>A2 (not equal to ) so that it show up on top vs. last one on bottom.
This comment was minimized by the moderator on the site
i tried the formula =A2=A1, it also got the result of show up on top.
This comment was minimized by the moderator on the site
i tried the formula =A1=A2, it also get the same result of show up on top
This comment was minimized by the moderator on the site
the true false really helped!
This comment was minimized by the moderator on the site
The True/False solution is a smart trick. Thanks
This comment was minimized by the moderator on the site
Is it possible to merge the like cells without the Kutools add-in?
This comment was minimized by the moderator on the site
This comment was minimized by the moderator on the site
In the first method, instead of =A3=A2, you can do =A2=A1 to keep the first instance and delete the rest of the duplicates.
This comment was minimized by the moderator on the site
yes it works
This comment was minimized by the moderator on the site
Thank you for this comment! Exactly what I was looking for!
This comment was minimized by the moderator on the site
Thank you for this tutorial, it saves me from tons of work removing duplicates.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations