Přejít k hlavnímu obsahu

Jak sloučit více listů se stejnými záhlavími v aplikaci Excel?

Například máte některá data se stejnými záhlavími v různých listech, jak jsou zobrazeny níže uvedené snímky obrazovky, a nyní máte za úkol tyto listy sloučit do jednoho listu. Místo toho, abyste je kopírovali a vkládali jeden po druhém, tento výukový program zavádí lepší způsoby, jak tuto práci zvládnout.

doc kombinovat stejnou hlavičku 1
doc kombinovat stejnou hlavičku 2
doc kombinovat stejnou hlavičku 3

Sloučit listy se stejnými záhlavími podle VBA

Konsolidujte listy aplikace Excel se stejnými záhlavími pomocí funkce Konsolidovat

Sloučení nebo sloučení listů aplikace Excel se stejnými záhlavími od Kutools pro Excel dobrý nápad3


šipka modrá pravá bublina Sloučit listy se stejnými záhlavími podle VBA

Pokud chcete pouze sloučit listy se stejnými záhlavími bez jakýchkoli výpočtů, můžete k řešení použít kód VBA.

1. Aktivujte sešit, který chcete sloučit, stiskněte Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.

2. cvaknutí Vložit > Modula poté vložte pod nový kód VBA nový Modul okno.

VBA: Sloučit listy se stejnými záhlavími

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. lis F5 pro spuštění VBA a objeví se dialogové okno pro zadání počtu řádků nadpisů. Viz screenshot:

doc kombinovat stejnou hlavičku 4

4. cvaknutí OK. A všechny listy v aktivním sešitu jsou sloučeny do nového listu s názvem "Kombinovaný".

doc kombinovat stejnou hlavičku 1
doc plus
doc kombinovat stejnou hlavičku 2
doc plus
doc kombinovat stejnou hlavičku 3
doc vertikální rovná
doc kombinovat stejnou hlavičku 3

Tip:

(1.) Vaše data musí začínat od A1, pokud ne, kód se neprojeví.

(2.) Vaše data musí mít stejnou strukturu.

(3.) Tento kód může kombinovat pouze všechny listy aktivního sešitu, pokud chcete sloučit listy z více sešitů, tento kód nebude fungovat.


šipka modrá pravá bublina Konsolidujte listy aplikace Excel se stejnými záhlavími pomocí funkce Konsolidovat

Předpokládejme, že máte některá data se stejnými záhlavími sloupců a řádků, jak je uvedeno níže, a chcete sloučit listy aplikace Excel se stejnými záhlavími a poté provést nějaké výpočty, můžete použít funkci Konsolidovat v aplikaci Excel.

doc kombinovat stejnou hlavičku 6
doc kombinovat stejnou hlavičku 7
doc kombinovat stejnou hlavičku 8

1. Otevřete všechny sešity, ze kterých chcete sloučit listy, a umístěte kurzor na prázdnou buňku, kde chcete vyhledat slučovaná data, a poté klikněte na Data > Konsolidujte . Viz snímek obrazovky:

doc kombinovat stejnou hlavičku 9

2. Pak v Konsolidujte okno, proveďte následující operaci:

1) Vyberte požadovaný výpočet funkce seznam;

2) Klepnutím vyberte rozsah, který chcete sloučit.

3) Klepněte na tlačítko přidat tlačítko pro přidání rozsahu do seznamu všech referencí. Chcete-li zopakovat 2) krok a 3) kroky a přidejte všechny rozsahy potřebné ke sloučení do tohoto seznamu.

4) Zkontrolujte Horní řádek a Levý sloupec pod Použít štítky v sekce.

5) Pokud chcete spojit sloučená data se zdrojovými daty, zkontrolujte Vytvořte odkazy na zdrojová data.

doc kombinovat stejnou hlavičku 10
doc kombinovat stejnou hlavičku 11
1) Vyberte požadovaný výpočet funkce seznam;

2) Klepnutím vyberte rozsah, který chcete sloučit.

3) Klepněte na tlačítko přidat tlačítko pro přidání rozsahu do seznamu všech referencí. Chcete-li zopakovat 2) krok a 3) kroky a přidejte všechny rozsahy potřebné ke sloučení do tohoto seznamu.

4) Zkontrolujte Horní řádek a Levý sloupec pod Použít štítky v sekce.

5) Pokud chcete spojit sloučená data se zdrojovými daty, zkontrolujte Vytvořte odkazy na zdrojová data.

3. cvaknutí OK. Nyní jsou všechny rozsahy dat se stejnými záhlavími sloučeny do jednoho a shrnuty podle záhlaví.

doc kombinovat stejnou hlavičku 6doc kombinovat stejnou hlavičku 7doc kombinovat stejnou hlavičku 8
doc vertikální rovná
doc kombinovat stejnou hlavičku 12

šipka modrá pravá bublina Sloučení nebo sloučení listů aplikace Excel se stejnými záhlavími od Kutools pro Excel

Pokud v některých případech chcete sloučit data pouze se stejnými záhlavími a v jiných případech chcete sloučit data a konsolidovat je, existují nějaké triky, které mohou vyřešit oba tyto úkoly? Tady představuji Kutools pro Excelje mocný Kombinovat pro vás.

Sloučit listy aplikace Excel se stejnými záhlavími

Konsolidujte více listů se stejnými záhlavími

Kutools pro Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalaci Kutools pro Excel, prosím, postupujte takto:(Zdarma ke stažení Kutools pro Excel nyní!)

Sloučit listy aplikace Excel se stejnými záhlavími

1. cvaknutí Kutools Plus > Kombinovat povolte průvodce Combine a poté zkontrolujte Zkombinujte více listů ze sešitů do jednoho listu. Zobrazit snímky obrazovky:
doc kombinovat stejnou hlavičku 14
doc kutools kombinovat 2

2. cvaknutí Další>> jít do Zkombinujte pracovní listy - krok 2 ze 3 průvodce a postupujte takto:

doc kutools kombinovat 3
1) Klepněte na tlačítko přidat > Složka přidat sešity, ze kterých můžete sloučit listy, do Seznam sešitů;
2) Zkontrolujte název sešitu, který chcete sloučit, můžete si vybrat více sešitů;
3) Zaškrtněte listy, které chcete kombinovat;
4) Klepněte na tlačítko vybrat dokument vyberte rozsah, který chcete kombinovat, pokud jsou rozsahy umístěny na stejném místě každého listu, stačí vybrat jeden rozsah z listu a poté kliknout Stejný rozsah.

3. cvaknutí Další >> k Kombinovat pracovní list - krok 3 ze 3 průvodce a zkontrolujte Možnost Zkombinovat podle řádku a typ 1 do textového pole Číslo nadpisového řádku, pokud ve vašem rozsahu není žádný titul, zadejte do něj 0.

doc kutools kombinovat 4

4. cvaknutí úpravaa objeví se dialogové okno, které vám připomene uložení tohoto scénáře. Pokud jej chcete uložit, klikněte na Anonebo Ne.

doc kombinovat stejnou hlavičku 17

Nyní jsou listy sloučeny se stejnými záhlavími řádků v novém sešitu.

doc kombinovat stejnou hlavičku 18

Konsolidujte více listů se stejnými záhlavími

Po instalaci Kutools pro Excel, prosím, postupujte takto:(Zdarma ke stažení Kutools pro Excel nyní!)

1. cvaknutí Enterprise > Kombinovat zobrazte průvodce Combine a zkontrolujte Konsolidujte a vypočítávejte hodnoty napříč několika sešity do jednoho listu. Viz snímek obrazovky:
doc kutools kombinovat 5

2. cvaknutí Další>> přejděte na Zkombinujte pracovní listy - krok 2 ze 3 průvodce a postupujte takto:

doc kutools kombinovat 3
1) Klepněte na tlačítko přidat > Složka přidat sešity, ze kterých můžete sloučit listy, do Seznam sešitů;
2) Zkontrolujte název sešitu, který chcete sloučit, můžete si vybrat více sešitů;
3) Zaškrtněte listy, které chcete kombinovat;
4) Klepněte na tlačítko vybrat dokument vyberte rozsah, který chcete kombinovat, pokud jsou rozsahy umístěny na stejném místě každého listu, stačí vybrat jeden rozsah z listu a poté kliknout Stejný rozsah.

3. Pokračujte kliknutím Další>> a vyberte funkci, kterou chcete použít ve sloučeném rozsahu, a zkontrolujte štítky pro váš sloučený rozsah. Viz screenshot:
doc kutools kombinovat 6

4. cvaknutí úpravaa objeví se dialogové okno s žádostí o uložení scénáře, klikněte na Ano uložit nebo kliknout Ne nezachránit to.

Potom jsou rozsahy sloučeny do nového sešitu.

doc kombinovat stejnou hlavičku 12

Výhodou Kutools pro ExcelJe Kombinovat Funkce spočívá v tom, že můžete sloučit více listů do otevřených sešitů nebo neotevřených sešitů do jednoho listu nebo jednoho sešitu.

Snadno kombinujte / konsolidujte data na základě stejné hodnoty v aplikaci Excel

Předpokládejme, že pracujete s listem, který obsahuje více duplicitních záznamů, a nyní musíte kombinovat / sloučit řádky založené na stejné hodnotě a provést nějaké výpočty, jako je součet, průměr, počet duplicitních řádků. S tím Pokročilé kombinování řádků of Kutools pro Excel, můžete rychle kombinovat stejné hodnoty / stejná data nebo duplikovat řádky do příslušných buněk.  Klikněte pro plnohodnotnou bezplatnou zkušební verzi za 30 dní!
doc pokročilé kombinovat řádky
 
Kutools pro Excel: s více než 300 praktickými doplňky Excel, můžete vyzkoušet bez omezení za 30 dní.

Relativní články

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
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