Jak usunąć duplikaty w Excelu za pomocą VBA (3 szybkie metody)

Hugh West

01-10-2023 Podstawy programu Excel
  • Udostępnij To
Hugh West

Jedną z ważniejszych czynności w Excelu jest. usuwać duplikaty z danego zestawu danych. Dziś pokażę jak usunąć duplikaty w Excelu używając tylko VBA.

Pobierz Zeszyt ćwiczeń

Usuń duplikaty w Excelu za pomocą VBA.xlsm

3 Szybkie metody wykorzystania VBA w Excelu do usuwania duplikatów

Mamy tu zestaw danych z. Nazwiska, identyfikatory, Znaki, oraz Klasy w egzaminie niektórych uczniów szkoły o nazwie Przedszkole Słonecznik.

Jeśli przyjrzysz się dokładnie, zauważysz, że niektóre nazwy zostały powtórzone omyłkowo.

Dzisiaj naszym celem jest usunięcie zduplikowanych wartości za pomocą Excel VBA.

1. użyj VBA, aby usunąć duplikaty z ustalonego zakresu komórek

Po pierwsze, postaramy się usuń zduplikowane nazwy używając stałego zakresu komórek w VBA kod.

Tutaj naszym zbiorem danych jest zakres B3:E15 w skoroszycie (W tym Nagłówki kolumn ).

Będziemy używać tego stałego zakresu komórek w kodzie tutaj.

Krok 1:

➤ Open a new VBA i wstawić nowy moduł (Kliknij tutaj, aby zobaczyć jak otworzyć i wstawić nowy moduł VBA w Excelu).

➤ Wstaw ten kod do modułu:

Kod: 

 Sub Remove_Duplicates() Range("A3:E14").RemoveDuplicates Columns:=1, Header:=xlYes End Sub

➤ Tworzy on makro o nazwie Remove_Duplicates . A3:E14 jest zakresem mojego zestawu danych, i chcę usunąć zduplikowane wiersze na podstawie Kolumna 1 . You use your one.

Krok 2:

➤ Wróć do swojego arkusza i uruchom to Makro (Click here to see how to run Macro).

➤ Spowoduje to usunięcie wierszy z duplikatami w kolumnie 1 ( Student Name).

Read More: Jak usunąć duplikaty w Excelu, ale zachować jeden (7 metod)

2. wstawianie kodów VBA do usuwania duplikatów z wybranego zakresu komórek

Teraz spróbujemy zbudować makro, które potrafi usunąć duplikaty z dowolnie wybranego zakresu komórek w arkuszu.

Krok 1:

➤ Open a new VBA ponownie okno i wstawić kolejny nowy moduł.

➤ Wstaw ten kod do modułu:

Kod: 

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=1, Header:=xlYes End Sub

➤ Tworzy on makro o nazwie Remove_Duplicates Chcę usunąć zduplikowane wiersze na podstawie Kolumna 1 . You use your one.

Krok 2:

➤ Wróćcie do swojego arkusza.

➤ Wybierz swój zestaw danych i uruchom to makro.

➤ Spowoduje to wykonanie tej samej czynności co powyżej. Usuń wiersze z duplikatami w kolumnie 1 ( Student Name).

Read More: Jak usunąć zduplikowane wiersze w Excelu (3 sposoby)

Podobne lektury

  • Jak usunąć duplikaty z kolumny w Excelu (3 metody)
  • Excel VBA: Usuń duplikaty z tablicy (2 przykłady)
  • Jak usunąć duplikaty i zachować pierwszą wartość w Excelu (5 metod)
  • Usuń zduplikowane wiersze z wyjątkiem pierwszego wystąpienia w Excelu (7 sposobów)
  • Jak usunąć oba duplikaty w programie Excel (5 prostych sposobów)

3. osadzenie makra VBA do usuwania duplikatów z wielu kolumn

Do tej pory usunęliśmy wiersze, które mają duplikaty w kolumnie 1 ( Imię i nazwisko ucznia ).

Ale w rzeczywistości nazwiska dwóch uczniów mogą być takie same, nie zawsze oznacza to, że został dodany błędnie, jeśli dwa nazwiska są takie same.

Ale jeśli identyfikatory dwóch studentów są również takie same, to są oni tym samym studentem. Wtedy wiersz ma zostać usunięty.

Tym razem opracujemy Makro, które usunie wiersz, jeśli zarówno nazwa, jak i ID dwóch wierszy są takie same.

Krok 1:

➤ Open a new VBA ponownie okno i wstawić kolejny nowy moduł.

➤ Wstaw ten kod do modułu:

Kod: 

 Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes End Sub

➤ Tworzy on makro o nazwie Remove_Duplicates Chcę usunąć zduplikowane wiersze na podstawie Kolumna 1 i 2 (nazwisko i identyfikator) . You use your one.

Krok 2:

➤ Wróćcie do swojego arkusza.

➤ Wybierz swój zestaw danych i uruchom to makro.

➤ Tym razem usunie wiersze tylko wtedy, gdy zarówno nazwisko, jak i identyfikator studenta są takie same.

Uwaga: Tutaj nie usunęła Jennifer Marlo, ponieważ identyfikatory obu studentek są różne, czyli są to dwie różne studentki.

Read More: Excel VBA: Usuń duplikaty porównując wiele kolumn (3 przykłady)

Wniosek

Korzystając z tych metod, można usunąć duplikaty ze zbioru danych w Excelu za pomocą VBA. Masz jakieś problemy, zapraszamy do zadawania pytań.

Poprzedni post Funkcja IFERROR w Excelu zwracająca puste miejsce zamiast 0
Następny post Jak zrobić wykres porównawczy w Excelu (4 skuteczne sposoby)

Hugh West jest bardzo doświadczonym trenerem i analitykiem Excela z ponad 10-letnim doświadczeniem w branży. Posiada tytuł licencjata w dziedzinie rachunkowości i finansów oraz tytuł magistra administracji biznesowej. Hugh ma pasję do nauczania i opracował unikalne podejście do nauczania, które jest łatwe do naśladowania i zrozumienia. Jego specjalistyczna wiedza na temat programu Excel pomogła tysiącom studentów i profesjonalistów na całym świecie doskonalić swoje umiejętności i osiągać doskonałe wyniki w karierze. Za pośrednictwem swojego bloga Hugh dzieli się swoją wiedzą ze światem, oferując bezpłatne samouczki programu Excel i szkolenia online, aby pomóc osobom indywidualnym i firmom w pełni wykorzystać swój potencjał.