Preskoči na glavno vsebino

Kako združiti več listov z enakimi glavami v Excelu?

Na primer, imate nekaj podatkov z enakimi glavami na različnih listih, kot so prikazani spodnji posnetki zaslona, ​​zdaj pa je vaša naloga združiti te liste v en list. Namesto da bi jih kopirali in prilepili enega za drugim, ta vadnica predstavlja boljše načine, kako lahko opravite to nalogo.

doc kombinira isto glavo 1
doc kombinira isto glavo 2
doc kombinira isto glavo 3

Spoji liste z enakimi glavami VBA

Združi excel liste z enakimi glavami s funkcijo Consolidate

Kutools za Excel združi ali konsolidira Excelove liste z enakimi glavami dobra ideja3


puščica modri desni mehurček Spoji liste z enakimi glavami VBA

Če želite liste zgolj združiti z enakimi glavami brez kakršnih koli izračunov, lahko za reševanje uporabite kodo VBA.

1. Aktivirajte delovni zvezek, v katerega želite združiti liste, pritisnite Alt + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduliin nato prilepite pod kodo VBA na novo Moduli okno.

VBA: Spoji liste z enakimi glavami

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. Pritisnite F5 tipko za zagon VBA in odpre se pogovorno okno za vnos števila naslovnih vrstic. Oglejte si posnetek zaslona:

doc kombinira isto glavo 4

4. klik OK. In vsi listi v aktivnem delovnem zvezku so združeni v novi list z imenom "Kombinirano".

doc kombinira isto glavo 1
doc plus
doc kombinira isto glavo 2
doc plus
doc kombinira isto glavo 3
doc navpično enako
doc kombinira isto glavo 3

Nasvet:

(1.) Vaši podatki se morajo začeti od A1, v nasprotnem primeru koda ne bo začela veljati.

(2.) Vaši podatki morajo imeti enako strukturo.

(3.) Ta koda lahko združuje samo vse delovne liste aktivnega delovnega zvezka. Če želite združiti delovne liste iz več delovnih zvezkov, ta koda ne bo delovala.


puščica modri desni mehurček Združi excel liste z enakimi glavami s funkcijo Consolidate

Recimo, da imate nekaj podatkov z enakimi glavami stolpcev in vrstic, kot je prikazano na spodnjem posnetku zaslona, ​​in želite združiti liste excel z enakimi glavami in nato narediti nekaj izračunov, lahko uporabite funkcijo Konsolidiraj v Excelu

doc kombinira isto glavo 6
doc kombinira isto glavo 7
doc kombinira isto glavo 8

1. Odprite vse delovne zvezke, iz katerih želite združiti liste, in postavite kazalko v prazno celico, kjer želite poiskati podatke, ki se združujejo, nato kliknite datum > utrditi. Oglejte si posnetek zaslona:

doc kombinira isto glavo 9

2. Nato v utrditi okno, naredite spodnjo operacijo:

1) Izberite obrazec za izračun, ki ga želite funkcija seznam;

2) Kliknite, da izberete obseg, ki ga želite združiti.

3) Kliknite Dodaj , da dodate obseg na seznam vseh referenc. Če želite ponoviti 2) korak in 3) korake, da dodate vse obsege, potrebne za združitev na ta seznam.

4) Preverite Zgornja vrstica in Levi stolpec pod Uporabite nalepke v oddelek.

5) Če želite združiti podatke z izvornimi podatki, potrdite Ustvarite povezave do izvornih podatkov.

doc kombinira isto glavo 10
doc kombinira isto glavo 11
1) Izberite obrazec za izračun, ki ga želite funkcija seznam;

2) Kliknite, da izberete obseg, ki ga želite združiti.

3) Kliknite Dodaj , da dodate obseg na seznam vseh referenc. Če želite ponoviti 2) korak in 3) korake, da dodate vse obsege, potrebne za združitev na ta seznam.

4) Preverite Zgornja vrstica in Levi stolpec pod Uporabite nalepke v oddelek.

5) Če želite združiti podatke z izvornimi podatki, potrdite Ustvarite povezave do izvornih podatkov.

3. klik OK. Zdaj so vsi obsegi podatkov z enakimi glavami združeni v enega in povzeti po glavah.

doc kombinira isto glavo 6doc kombinira isto glavo 7doc kombinira isto glavo 8
doc navpično enako
doc kombinira isto glavo 12

puščica modri desni mehurček Kutools za Excel združi ali konsolidira Excelove liste z enakimi glavami

Če želite v nekaterih primerih združiti podatke samo z istimi glavami, v drugih primerih pa jih želite združiti in utrditi, ali lahko kakšen trik reši obe nalogi? Tukaj predstavljam Kutools za Excelje močan Združite funkcija za vas.

Spoji Excelove liste z enakimi glavami

Združi več listov z enakimi glavami

Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. 

Po namestitvi Kutools za Excel, naredite spodaj:(Brezplačno prenesite Kutools za Excel zdaj!)

Spoji Excelove liste z enakimi glavami

1. klik Kutools Plus > Združite da omogočite čarovnika za kombiniranje in nato preverite Več delovnih listov iz delovnih zvezkov združite v en delovni list. Oglejte si posnetke zaslona:
doc kombinira isto glavo 14
doc kutools združujejo 2

2. klik Naprej>> iti Združite delovne liste - 2. korak od 3 čarovnika in naredite spodaj:

doc kutools združujejo 3
1) Kliknite Dodaj > Mapa z datotekami za dodajanje delovnih zvezkov, iz katerih lahko združite liste, v Seznam delovnih zvezkov;
2) Označite ime delovnega zvezka, ki ga želite združiti, lahko izberete več delovnih zvezkov;
3) Preverite delovne liste, ki jih želite združiti;
4) Kliknite doc izberite če želite izbrati obseg, ki ga želite združiti, če so razponi postavljeni na isto mesto vsakega lista, morate samo izbrati en obseg s lista in kliknite Isti obseg.

3. klik Naprej >> k Združite delovni list - 3. korak od 3 čarovnika in preverite Možnost kombiniranja po vrsticah in tip 1 v besedilno polje Številka naslovne vrstice, če v vašem obsegu ni naslova, vanj vnesite 0.

doc kutools združujejo 4

4. klik Konecin odpre se pogovorno okno, ki vas opomni, da shranite ta scenarij. Če ga želite shraniti, kliknite Daali Ne.

doc kombinira isto glavo 17

Zdaj se listi združijo z enakimi glavami vrstic v novem delovnem zvezku.

doc kombinira isto glavo 18

Združi več listov z enakimi glavami

Po namestitvi Kutools za Excel, naredite spodaj:(Brezplačno prenesite Kutools za Excel zdaj!)

1. klik Podjetje > Združite za prikaz čarovnika za kombiniranje in potrdite V enem delovnem listu združite in izračunajte vrednosti v več delovnih zvezkih. Oglejte si posnetek zaslona:
doc kutools združujejo 5

2. klik Naprej>> Pojdite na Združite delovne liste - 2. korak od 3 čarovnika in naredite spodaj:

doc kutools združujejo 3
1) Kliknite Dodaj > Mapa z datotekami za dodajanje delovnih zvezkov, iz katerih lahko združite liste, v Seznam delovnih zvezkov;
2) Označite ime delovnega zvezka, ki ga želite združiti, lahko izberete več delovnih zvezkov;
3) Preverite delovne liste, ki jih želite združiti;
4) Kliknite doc izberite če želite izbrati obseg, ki ga želite združiti, če so razponi postavljeni na isto mesto vsakega lista, morate samo izbrati en obseg s lista in kliknite Isti obseg.

3. Nadaljujte s klikom Naprej>> in izberite funkcijo, ki jo želite uporabiti v združenem obsegu, in preverite oznake za vaš združeni obseg. Oglejte si posnetek zaslona:
doc kutools združujejo 6

4. klik Konecin odpre se pogovorno okno z zahtevo, da shranite scenarij, kliknite Da shranite ali kliknite Ne da ga ne shranite.

Nato so obsegi strnjeni v novi delovni zvezek.

doc kombinira isto glavo 12

Prednost Kutools za ExcelJe Združite Funkcija je, da lahko v odprtem ali neodprtem delovnem zvezku združite več listov v en delovni list ali en delovni zvezek.

Preprosto kombinirajte / konsolidirajte podatke na podlagi enake vrednosti v Excelu

Recimo, da delate z delovnim listom, ki vsebuje več podvojenih zapisov, zdaj pa morate združiti / združiti vrstice na podlagi iste vrednosti in opraviti nekaj izračunov, kot so vsota, povprečje, štetje podvojenih vrstic. S tem Napredne kombinirane vrstice of Kutools za Excel, lahko hitro združite iste vrednosti / iste podatke ali podvojene vrstice v ustrezne celice.  Kliknite za popolno brezplačno preskusno različico v 30 dneh!
doc napredne kombinacije vrstic
 
Kutools za Excel: z več kot 300 priročnimi dodatki za Excel lahko brezplačno preizkusite brez omejitev v 30 dneh.

Relativni članki

Najboljša pisarniška orodja za produktivnost

🤖 Kutools AI Aide: Revolucionirajte analizo podatkov na podlagi: Inteligentna izvedba   |  Ustvari kodo  |  Ustvarite formule po meri  |  Analizirajte podatke in ustvarite grafikone  |  Prikličite funkcije Kutools...
Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

Opis


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
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