Przejdź do głównej zawartości

Jak scalić wiele arkuszy z tymi samymi nagłówkami w programie Excel?

Na przykład masz pewne dane z tymi samymi nagłówkami w różnych arkuszach, jak pokazano na poniższych zrzutach ekranu, a teraz Twoim zadaniem jest scalenie tych arkuszy w jeden arkusz. Zamiast kopiować i wklejać je jeden po drugim, ten samouczek przedstawia lepsze sposoby wykonywania tej pracy.

doc połącz ten sam nagłówek 1
doc połącz ten sam nagłówek 2
doc połącz ten sam nagłówek 3

Scal arkusze z tymi samymi nagłówkami według VBA

Konsoliduj arkusze programu Excel z tymi samymi nagłówkami za pomocą funkcji Konsoliduj

Scal lub konsoliduj arkusze Excela z tymi samymi nagłówkami przez Kutools for Excel dobry pomysł 3


strzałka niebieski prawy bąbelek Scal arkusze z tymi samymi nagłówkami według VBA

Jeśli chcesz po prostu scalić arkusze z tymi samymi nagłówkami bez żadnych obliczeń, możesz zastosować kod VBA, aby go rozwiązać.

1. Aktywuj skoroszyt, w którym chcesz scalić arkusze, naciśnij Alt + F11 klucze do otwarcia Microsoft Visual Basic for Applications okno.

2. kliknij wstawka > Moduł, a następnie wklej poniższy kod VBA do nowego Moduł okno.

VBA: Scal arkusze z takimi samymi nagłówkami

Sub Combine()
'UpdateByKutools20151029
    Dim i As Integer
    Dim xTCount As Variant
    Dim xWs As Worksheet
    On Error Resume Next
LInput:
    xTCount = Application.InputBox("The number of title rows", "", "1")
    If TypeName(xTCount) = "Boolean" Then Exit Sub
    If Not IsNumeric(xTCount) Then
        MsgBox "Only can enter number", , "Kutools for Excel"
        GoTo LInput
    End If
    Set xWs = ActiveWorkbook.Worksheets.Add(Sheets(1))
    xWs.Name = "Combined"
    Worksheets(2).Range("A1").EntireRow.Copy Destination:=xWs.Range("A1")
    For i = 2 To Worksheets.Count
        Worksheets(i).Range("A1").CurrentRegion.Offset(CInt(xTCount), 0).Copy _
               Destination:=xWs.Cells(xWs.UsedRange.Cells(xWs.UsedRange.Count).Row + 1, 1)
    Next
End Sub

3. naciśnij F5 aby uruchomić VBA i pojawi się okno dialogowe, w którym można wprowadzić liczbę wierszy tytułu. Zobacz zrzut ekranu:

doc połącz ten sam nagłówek 4

4. kliknij OK. Wszystkie arkusze w aktywnym skoroszycie są scalane w nowy arkusz o nazwie "Łączny".

doc połącz ten sam nagłówek 1
doktor plus
doc połącz ten sam nagłówek 2
doktor plus
doc połącz ten sam nagłówek 3
doc w pionie równe
doc połącz ten sam nagłówek 3

Wskazówka:

(1.) Twoje dane muszą zaczynać się od A1, jeśli nie, kod nie zadziała.

(2.) Twoje dane muszą mieć taką samą strukturę.

(3.) Ten kod może łączyć tylko wszystkie arkusze aktywnego skoroszytu, jeśli chcesz scalić arkusze z wielu skoroszytów, ten kod nie zadziała.


strzałka niebieski prawy bąbelek Konsoliduj arkusze programu Excel z tymi samymi nagłówkami za pomocą funkcji Konsoliduj

Przypuśćmy, że masz dane z tymi samymi nagłówkami kolumn i wierszy, jak pokazano na zrzucie ekranu, i chcesz scalić arkusze programu Excel z tymi samymi nagłówkami, a następnie wykonać obliczenia, możesz zastosować funkcję Konsoliduj w programie Excel.

doc połącz ten sam nagłówek 6
doc połącz ten sam nagłówek 7
doc połącz ten sam nagłówek 8

1. Otwórz wszystkie skoroszyty, z których chcesz scalić arkusze, i umieść kursor w pustej komórce, w której chcesz zlokalizować scalane dane, a następnie kliknij Dane > Konsolidować. Zobacz zrzut ekranu:

doc połącz ten sam nagłówek 9

2. Następnie w Konsolidować okno, wykonaj poniższe czynności:

1) Wybierz obliczenie, które chcesz utworzyć Funkcjonować lista;

2) Kliknij, aby zaznaczyć zakres, który chcesz scalić.

3) Kliknij Dodaj przycisk, aby dodać zakres do listy wszystkich odniesień. Aby powtórzyć 2) krok i 3) kroki, aby dodać wszystkie zakresy potrzebne do scalenia do tej listy.

4) Sprawdź Górny rząd i Lewa kolumna dla Użyj etykiet w

5) Jeśli chcesz połączyć scalone dane z danymi źródłowymi, zaznacz Utwórz łącza do danych źródłowych.

doc połącz ten sam nagłówek 10
doc połącz ten sam nagłówek 11
1) Wybierz obliczenie, które chcesz utworzyć Funkcjonować lista;

2) Kliknij, aby zaznaczyć zakres, który chcesz scalić.

3) Kliknij Dodaj przycisk, aby dodać zakres do listy wszystkich odniesień. Aby powtórzyć 2) krok i 3) kroki, aby dodać wszystkie zakresy potrzebne do scalenia do tej listy.

4) Sprawdź Górny rząd i Lewa kolumna dla Użyj etykiet w

5) Jeśli chcesz połączyć scalone dane z danymi źródłowymi, zaznacz Utwórz łącza do danych źródłowych.

3. kliknij OK. Teraz cały zakres danych z takimi samymi nagłówkami jest łączony w jeden i sumowany według nagłówków.

doc połącz ten sam nagłówek 6doc połącz ten sam nagłówek 7doc połącz ten sam nagłówek 8
doc w pionie równe
doc połącz ten sam nagłówek 12

strzałka niebieski prawy bąbelek Scal lub konsoliduj arkusze Excela z tymi samymi nagłówkami przez Kutools for Excel

Jeśli w niektórych przypadkach chcesz scalić dane tylko z tymi samymi nagłówkami, aw innych chcesz połączyć dane i je skonsolidować, czy są jakieś sztuczki, które mogą rozwiązać oba te zadania? Tutaj przedstawiam Kutools dla programu Exceljest potężny Połączyć funkcja dla ciebie.

Scal arkusze Excela z tymi samymi nagłówkami

Konsoliduj wiele arkuszy z tymi samymi nagłówkami

Kutools dla programu Excel, ponad 300 przydatne funkcje, ułatwiają pracę. 

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

Scal arkusze Excela z tymi samymi nagłówkami

1. kliknij Kutools Plus > Połączyć aby włączyć kreatora łączenia, a następnie zaznacz Połącz wiele arkuszy ze skoroszytów w jeden arkusz. Zobacz zrzuty ekranu:
doc połącz ten sam nagłówek 14
doc kutools łączą 2

2. kliknij Dalej>> , aby przejść do Połącz arkusze - krok 2 z 3 kreatora i wykonaj poniższe czynności:

doc kutools łączą 3
1) Kliknij Dodaj > Folder plików aby dodać skoroszyty, z których możesz scalać arkusze z Lista skoroszytów;
2) Sprawdź nazwę skoroszytu, którą chcesz scalić arkusze, możesz wybrać wiele skoroszytów;
3) Sprawdź arkusze, które chcesz połączyć;
4) Kliknij wybierz dokument aby wybrać zakres, który chcesz połączyć, jeśli zakresy są umieszczone w tym samym miejscu każdego arkusza, wystarczy wybrać jeden zakres z arkusza, a następnie kliknąć Ten sam zakres.

3. kliknij Dalej >> do Połącz arkusz roboczy - krok 3 z 3 kreatora i sprawdź Połącz według opcji wiersza i typ 1 w polu tekstowym Numer wiersza tytułu, jeśli w Twoim zakresie nie ma tytułu, wpisz w nim 0.

doc kutools łączą 4

4. kliknij konieci pojawi się okno dialogowe przypominające o zapisaniu scenariusza, jeśli chcesz go zapisać, kliknij Taklub Nie.

doc połącz ten sam nagłówek 17

Teraz arkusze są scalane z tymi samymi nagłówkami wierszy w nowym skoroszycie.

doc połącz ten sam nagłówek 18

Konsoliduj wiele arkuszy z tymi samymi nagłówkami

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

1. kliknij Enterprise > Połączyć aby wyświetlić kreatora łączenia, i zaznacz Konsoliduj i obliczaj wartości z wielu skoroszytów w jednym arkuszu. Zobacz zrzut ekranu:
doc kutools łączą 5

2. kliknij Dalej>> , aby przejść do Połącz arkusze - krok 2 z 3 kreatora i wykonaj poniższe czynności:

doc kutools łączą 3
1) Kliknij Dodaj > Folder plików aby dodać skoroszyty, z których możesz scalać arkusze z Lista skoroszytów;
2) Sprawdź nazwę skoroszytu, którą chcesz scalić arkusze, możesz wybrać wiele skoroszytów;
3) Sprawdź arkusze, które chcesz połączyć;
4) Kliknij wybierz dokument aby wybrać zakres, który chcesz połączyć, jeśli zakresy są umieszczone w tym samym miejscu każdego arkusza, wystarczy wybrać jeden zakres z arkusza, a następnie kliknąć Ten sam zakres.

3. Kliknij dalej Dalej>> i wybierz funkcję, którą chcesz zastosować w scalonym zakresie, i sprawdź etykiety scalonego zakresu. Zobacz zrzut ekranu:
doc kutools łączą 6

4. kliknij konieci pojawi się okno dialogowe z prośbą o zapisanie scenariusza, kliknij Tak aby zapisać, lub kliknij Nie żeby tego nie uratować.

Następnie zakresy są konsolidowane w nowym skoroszycie.

doc połącz ten sam nagłówek 12

Zaletą Kutools dla programu Excel'S Połączyć Funkcja polega na tym, że można scalić wiele arkuszy w otwartych lub nieotwartych skoroszytach w jeden arkusz lub jeden skoroszyt.

Łatwe łączenie / konsolidowanie danych na podstawie tej samej wartości w programie Excel

Przypuśćmy, że pracujesz z arkuszem, który zawiera wiele zduplikowanych rekordów, a teraz musisz połączyć / scalić wiersze na podstawie tej samej wartości i wykonać pewne obliczenia, takie jak suma, średnia, liczba zduplikowanych wierszy. Z tym Zaawansowane wiersze łączenia of Kutools dla programu Excel, możesz szybko połączyć te same wartości / te same dane lub zduplikować wiersze w odpowiednich komórkach.  Kliknij, aby uzyskać pełny, bezpłatny okres próbny w ciągu 30 dni!
doc zaawansowane łączenie wierszy
 
Kutools dla programu Excel: z ponad 300 poręcznymi dodatkami do Excela, możesz wypróbować bez ograniczeń w 30 dniach.

Artykuły względne

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 (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
When using the VBA code only two of my sheets are combining instead of the three active sheets. The headers are all the same and all start in cell A1. Would you have any idea what the issue is please?
This comment was minimized by the moderator on the site
Bonjour, est-ce possible de Fusionner et LIER Plusieurs Feuilles Avec Les Mêmes En-Têtes Dans Excel afin que les changements qui sont effectués dans les feuilles du classeur soient appliqués dans la nouvelle feuille "combinée"?
This comment was minimized by the moderator on the site
Hello, If you want to combine sheets which with the same sheet names, there is no built-in feature in Excel can help you. You can try Combine feature of Kutools for Excel, it provides an option that combine sheets with same names, for more details, you can visit this tutorial https://www.extendoffice.com/product/kutools-for-excel/excel-combine-sheets-of-same-name-into-one-worksheet.html. And Kutools for Excel supports 30-day free trial, you can download it to have a try. https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
Very helpful the code for combining multiple worksheets, it worked fine! Thank you!
This comment was minimized by the moderator on the site
what will be vba code for combining multiple sheets in workbook into one worksheet if row headers are the same ( not column headers)
This comment was minimized by the moderator on the site
I used VBA to copy all sheets to one, but how can I copy only select sheets instead of all of them?
This comment was minimized by the moderator on the site
Esta excelente la primera macro, pero no sabrias decirme por que solamente me combina 4 columnas?. Si mis hojas tienen un aproximado de 30 columnas.
This comment was minimized by the moderator on the site
Hello
I bought Kutools for Excel 19.00, by interest in the merge function, but doesn't work with my files and sheets, all have the same name (Workbook an sheets) but in the combination of : "Combine all same name worksheets into one worksheet" dosn't work (does nothing), inclusive don't saves the new workbook in the place that I select prior to execute de Finish button.
I followed the instructions one and another time, but the result is the same.
Some help?
This comment was minimized by the moderator on the site
Hi, Ezequiel Zavaleta, I am sorry for hear that. You can contact our Customer Service Manager through this: our team will solve your problems as soon as possible.
This comment was minimized by the moderator on the site
perfect, thank you
This comment was minimized by the moderator on the site
How can I combine only sheets with same header ignoring other sheets?
This comment was minimized by the moderator on the site
How do I merge only select worksheets in that workbook?
How can I run the Macro to refresh the data on a weekly basis without having to delete the "Combined" tab?
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations