Note: The other languages of the website are Google-translated. Back to English
Zaloguj Się  \/ 
x
or
x
Zarejestruj się  \/ 
x

or

Jak połączyć wiele wierszy w jeden na podstawie duplikatów w programie Excel?

Być może masz następujące dane zrzutu ekranu, w kolumnie Nazwa produktu A znajdują się zduplikowane elementy, a teraz musisz usunąć zduplikowane wpisy w kolumnie A, ale połączyć odpowiednie wartości w kolumnie B, patrz zrzuty ekranu:

doc-advanced-comb1 -2 doc-advanced-comb2

Czy masz jakieś skuteczne sposoby rozwiązania tego zadania?

Połącz wiele zduplikowanych wierszy w jeden za pomocą kodu VBA

Połącz wiele zduplikowanych wierszy w jeden Kutools for Excel

Połącz wiele zduplikowanych wierszy i zsumuj / uśrednij wartości za pomocą Kutools for Excel

Karta Office Włącz edycję i przeglądanie na kartach w pakiecie Office i znacznie ułatw swoją pracę ...
Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%
  • Wykorzystaj wszystko ponownie: Dodaj najczęściej używane lub złożone formuły, wykresy i wszystko inne do ulubionych i szybko wykorzystaj je ponownie w przyszłości.
  • Ponad 20 funkcji tekstowych: Wyodrębnij liczbę z ciągu tekstowego; Wyodrębnij lub usuń część tekstów; Konwertuj liczby i waluty na angielskie słowa.
  • Narzędzia do scalania: Wiele skoroszytów i arkuszy w jeden; Scal wiele komórek / wierszy / kolumn bez utraty danych; Połącz zduplikowane wiersze i sumę.
  • Podziel narzędzia: Podziel dane na wiele arkuszy na podstawie wartości; Jeden skoroszyt do wielu plików Excel, PDF lub CSV; Jedna kolumna na wiele kolumn.
  • Wklej pomijanie Ukryte / filtrowane wiersze; Policz i suma według koloru tła; Wysyłaj spersonalizowane wiadomości e-mail do wielu odbiorców zbiorczo.
  • Super filtr: Twórz zaawansowane schematy filtrów i stosuj do dowolnych arkuszy; Sortuj według tygodnia, dnia, częstotliwości i nie tylko; Filtruj pogrubieniem, formułami, komentarzem ...
  • Ponad 300 zaawansowanych funkcji; Działa z Office 2007-2019 i 365; Obsługuje wszystkie języki; Łatwe wdrażanie w przedsiębiorstwie lub organizacji.

strzałka niebieski prawy bąbelekPołącz wiele zduplikowanych wierszy w jeden za pomocą kodu VBA


Poniższy kod VBA może pomóc w łączeniu zduplikowanych wierszy na podstawie wartości kolumny A, a poniższy kod jest stosowany tylko do dwóch kolumn. Tak więc, jeśli masz dane w dwóch kolumnach, ten kod zrobi ci przysługę.

1. Przytrzymaj ALT + F11 klucze i otwiera plik Okno Microsoft Visual Basic for Applications.

2, Kliknij wstawka > Modułi wklej następujący kod w Okno modułu.

Kod VBA: połącz wiele wierszy w jeden

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3. Następnie naciśnij F5 i pojawi się okienko zachęty przypominające o wyborze zakresu, który chcesz połączyć. Zobacz zrzut ekranu:

doc-advanced-comb3

4. A następnie kliknij OKwartości w kolumnie B zostały połączone w jeden rekord i oddzielone spacjami.

doc-advanced-comb4

Uwagi:

1. Ten kod może zniszczyć oryginalne dane, kiedy go używasz, lepiej najpierw wykonaj kopię zapasową danych.

2. Ten kod jest stosowany tylko dla dwóch kolumn, jeśli masz więcej niż dwie kolumny, ten kod połączy tylko pierwsze dwie kolumny i usunie dane z innych kolumn. Używając tego kodu, musisz być ostrożny.


strzałka niebieski prawy bąbelekPołącz wiele zduplikowanych wierszy w jeden Kutools for Excel

Teraz, gdy powyższy kod ma pewne ograniczenia i ryzyko, czy istnieje wygodny i bezpieczny sposób na zakończenie tej pracy? Z Kutools dla programu Excel'S Zaawansowane wiersze łączenia narzędzie, możesz szybko usunąć wiele zduplikowanych wierszy z kolumn, na których bazujesz, i scalić je lub wykonać obliczenia dla innych rekordów w odpowiednich komórkach.

Kutools dla programu Excel zawiera ponad 300 przydatnych narzędzi programu Excel. Bezpłatne wypróbowanie bez ograniczeń w ciągu 30 dni. Pobierz teraz.

Po zainstalowaniu Kutools dla programu Excel wykonaj następujące czynności:

1. Wybierz zakres danych, które chcesz połączyć duplikaty.

doc-advanced-comb5

2. Następnie kliknij Kutools > Konwerter treści > Zaawansowane wiersze łączenia. Zobacz zrzut ekranu:

doc-advanced-comb6

3, w Zaawansowane wiersze łączenia w oknie dialogowym wybierz nazwę kolumny jako kolumny kluczowe, na podstawie których chcesz połączyć wartości, a następnie kliknij Kluczowe kolumny. Zobacz zrzut ekranu:

doc-advanced-comb7

4. Następnie kliknij kolumnę, w której chcesz połączyć ich wartości w jeden rekord, a następnie kliknij Połącz operacje I wybierz Łączyć tylko z separatoremi wybierz jeden separator, który chcesz oddzielić połączone wartości z prawej listy. Zobacz zrzut ekranu:

doc-advanced-comb8

5. Po zakończeniu ustawień kliknij OK, a Twoje dane zostaną scalone na podstawie kluczowych kolumn i oddzielone separatorami.

doc-advanced-comb9

Uwaga: Jeśli nie musisz ustawiać operacji dla pozostałych kolumn, po prostu zachowaj stan domyślny.


strzałka niebieski prawy bąbelekPołącz wiele zduplikowanych wierszy i zsumuj / uśrednij wartości za pomocą Kutools for Excel

Dzięki temu wielofunkcyjnemu Zaawansowane wiersze łączenia narzędzie, można łączyć zduplikowane wiersze i wykonywać obliczenia dla wartości.

1. Wybierz zakres danych, które chcesz połączyć duplikaty.

2. Idź do Zaawansowane wiersze łączenia Okno dialogowe;

  • (1.) Wybierz nazwę kolumny jako kolumnę kluczową, na podstawie której chcesz obliczyć inne wartości kolumn, a następnie kliknij Kluczowe kolumny;
  • (2.) Wybierz kolumnę, dla której chcesz wykonać obliczenia dla wartości, a następnie kliknij Połącz operacje > Połącz obliczyć, a następnie wybierz jeden typ obliczeń, którego potrzebujesz, w tym przypadku wybieram Suma. Zobacz zrzut ekranu:

doc-advanced-comb10

3. Jeśli nie musisz ustawiać operacji dla pozostałych kolumn, po prostu zachowaj stan domyślny, a następnie kliknij OK, a zduplikowane wartości w kolumnie A zostaną scalone, a odpowiadające im wartości w kolumnie B zostaną zsumowane. Zobacz zrzuty ekranu:

doc-advanced-comb11 -2 doc-advanced-comb12

Uwagi:

1. Jeśli zaznaczysz Moje dane mają nagłówki opcja, twoje nagłówki (pierwszy wiersz) zakresu zostaną zignorowane po zastosowaniu tego narzędzia.

2. Użyj sformatowanych wartości: zachowa formatowanie wartości po połączeniu zduplikowanych komórek.

3. To narzędzie nie jest dostępne do filtrowania danych.

Kliknij, aby dowiedzieć się więcej o tej funkcji Zaawansowane łączenie wierszy.


Podobne artykuły:

Połącz zduplikowane wiersze i zsumuj wartości


Najlepsze narzędzia biurowe

Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%

  • Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
  • Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
  • Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
  • Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
  • Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
  • Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
  • Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
  • Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
  • Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2019 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowy bezpłatny okres próbny. 60-dniowa gwarancja zwrotu pieniędzy.
karta kte 201905

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ęć myszą każdego dnia!
officetab dół
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ashley · 3 years ago
    I have used the code above successfully in the past however today, it is deleting column B. Looks like it's just removing duplicates...not sure what the issue is.

    Sample Data
    Reece, Ashley G01-Registered-UWG
    Reece, Chris G02-Registered-KSU
    Reece, Chris G03-Dropped-KSU
    Reece, Jayden G02-Registered-UNG
    Reece, Jayden G02-Withdrawn-UNG
  • To post as a guest, your comment is unpublished.
    Muveen · 4 years ago
    I have in column A

    1 Cast
    2 Crew
    3 Hiring
    4 Cast
    5 Hiring
    6 Crew

    I need these unique CAST CREW AND HIRING in another column without delete in column A entries.

    Ex: I need (after formula)

    1 Cast
    2 Crew
    3 Hiring

    Is it possible by formula?
  • To post as a guest, your comment is unpublished.
    Ilaiyaraja · 5 years ago
    Above Macro only Combine the limited cell(e.g 20 cells) in b column. How to Combine more cells
    • To post as a guest, your comment is unpublished.
      NewYears1978 · 2 months ago
      Same - 2021 and this still only works if you have like 20 rows...
  • To post as a guest, your comment is unpublished.
    David Greene · 7 years ago
    I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?
    • To post as a guest, your comment is unpublished.
      NewYears1978 · 2 months ago
      Same here. I was about to purchase because the tools are very nice, but figured I would try it first. Combine never works. I tried it for about 3 weeks now and it always locks up. No matter the power of my computer (ran on my at home powerhouse computer, same issue)

      I kept cutting down to less and less data to see if it would work but it still would not.

      The last one I tried was 4 columns and 100k rows and it still locked up. Not very useful unless you have like < 100 rows or something.
    • To post as a guest, your comment is unpublished.
      JP · 2 months ago
      Same here, I filtered my data all the way down to 4 columns and 100k rows and it still work not work. I have tried this for 3 weeks now and unable to successfully complete my task. Kutools will only work if you have very few rows.
    • To post as a guest, your comment is unpublished.
      Admin-jay · 7 years ago
      [quote name="David Greene"]I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?[/quote]
      Sorry, we will fix it in next version.