Ga naar hoofdinhoud

Hoe meerdere bladen met dezelfde kopteksten samenvoegen in Excel?

U hebt bijvoorbeeld enkele gegevens met dezelfde kopteksten in verschillende bladen zoals hieronder weergegeven schermafbeeldingen, en nu is het uw taak om deze bladen samen te voegen tot één blad. In plaats van ze een voor een te kopiëren en te plakken, introduceert deze tutorial de betere manieren om deze taak uit te voeren.

doc combineren dezelfde koptekst 1
doc combineren dezelfde koptekst 2
doc combineren dezelfde koptekst 3

Voeg bladen met dezelfde kopteksten samen door VBA

Consolideer Excel-bladen met dezelfde kopteksten door de functie Consolideren

Voeg Excel-bladen met dezelfde kopteksten samen of consolideer ze door Kutools voor Excel goed idee 3


pijl blauw rechts bel Voeg bladen met dezelfde kopteksten samen door VBA

Als u de bladen met dezelfde kopteksten gewoon zonder berekeningen wilt samenvoegen, kunt u de VBA-code toepassen om het op te lossen.

1. Activeer de werkmap waarin u de bladen wilt samenvoegen, druk op Alt + F11 sleutels om te openen Microsoft Visual Basic voor toepassingen venster.

2. klikken Invoegen > Moduleen plak vervolgens onder VBA-code in het nieuwe Module venster.

VBA: voeg bladen met dezelfde kopteksten samen

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. druk op F5 toets om de VBA uit te voeren, en er verschijnt een dialoogvenster waarin u het aantal titelrijen kunt invoeren. Zie screenshot:

doc combineren dezelfde koptekst 4

4. klikken OK. En alle bladen in de actieve werkmap worden samengevoegd in een nieuw blad met de naam "Gecombineerd".

doc combineren dezelfde koptekst 1
dokter plus
doc combineren dezelfde koptekst 2
dokter plus
doc combineren dezelfde koptekst 3
doc verticaal gelijk
doc combineren dezelfde koptekst 3

Tip:

(1.) Uw gegevens moeten beginnen bij A1, zo niet, dan wordt de code niet van kracht.

(2.) Uw gegevens moeten dezelfde structuur hebben.

(3.) Deze code kan alleen alle werkbladen van de actieve werkmap combineren. Als u werkbladen uit meerdere werkmappen wilt samenvoegen, zal deze code niet werken.


pijl blauw rechts bel Consolideer Excel-bladen met dezelfde kopteksten door de functie Consolideren

Stel dat u enkele gegevens heeft met dezelfde kolom- en rijkoppen als onderstaand screenshot, en u wilt Excel-bladen met dezelfde kopteksten samenvoegen en vervolgens wat berekeningen uitvoeren, dan kunt u de functie Consolideren in Excel toepassen.

doc combineren dezelfde koptekst 6
doc combineren dezelfde koptekst 7
doc combineren dezelfde koptekst 8

1. Open alle werkmappen waaruit u werkbladen wilt samenvoegen en plaats de cursor op een lege cel waar u de samenvoeggegevens wilt zoeken, en klik vervolgens op Data > Consolideren. Zie screenshot:

doc combineren dezelfde koptekst 9

2. Vervolgens in de Consolideren venster, doe zoals hieronder operatie:

1) Selecteer de gewenste berekening Functie lijst;

2) Klik om het bereik te selecteren dat u wilt samenvoegen.

3) Klik op Toevoegen knop om het bereik toe te voegen aan de lijst met alle referenties. Om 2) stap en 3) stappen te herhalen om alle bereiken toe te voegen die nodig zijn om in deze lijst te worden samengevoegd.

4) Controleer Bovenste rij en Linker kolom voor Gebruik labels in pagina.

5) Als u de samengevoegde gegevens aan de brongegevens wilt koppelen, vink dan aan Maak links naar brongegevens.

doc combineren dezelfde koptekst 10
doc combineren dezelfde koptekst 11
1) Selecteer de gewenste berekening Functie lijst;

2) Klik om het bereik te selecteren dat u wilt samenvoegen.

3) Klik op Toevoegen knop om het bereik toe te voegen aan de lijst met alle referenties. Om 2) stap en 3) stappen te herhalen om alle bereiken toe te voegen die nodig zijn om in deze lijst te worden samengevoegd.

4) Controleer Bovenste rij en Linker kolom voor Gebruik labels in pagina.

5) Als u de samengevoegde gegevens aan de brongegevens wilt koppelen, vink dan aan Maak links naar brongegevens.

3. klikken OK. Nu worden alle gegevensreeksen met dezelfde kopteksten samengevoegd tot één gegevensbereik en worden ze samengevat in kopteksten.

doc combineren dezelfde koptekst 6doc combineren dezelfde koptekst 7doc combineren dezelfde koptekst 8
doc verticaal gelijk
doc combineren dezelfde koptekst 12

pijl blauw rechts bel Voeg Excel-bladen met dezelfde kopteksten samen of consolideer ze door Kutools voor Excel

Als u in sommige gevallen alleen gegevens met dezelfde kopteksten wilt samenvoegen en in andere gevallen gegevens wilt samenvoegen en consolideren, zijn er dan trucs waarmee u beide taken kunt oplossen? Hier introduceer ik Kutools for Excelis krachtig Combineren functie voor jou.

Voeg Excel-bladen met dezelfde kopteksten samen

Consolideer meerdere bladen met dezelfde kopteksten

Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. 

Na het installeren van Kutools voor Excel, doe het als volgt:(Download nu Kutools voor Excel!)

Voeg Excel-bladen met dezelfde kopteksten samen

1. klikken Koetools Plus > Combineren om de combineerwizard in te schakelen en vink vervolgens aan Combineer meerdere werkbladen uit werkmappen in één werkblad. Zie screenshots:
doc combineren dezelfde koptekst 14
doc kutools combineren 2

2. klikken Volgende>> naar Combineer werkbladen - Stap 2 van 3 wizard, en doe zoals hieronder:

doc kutools combineren 3
1) Klik op Toevoegen > Bestandsmap om de werkmappen toe te voegen waaruit u werkbladen kunt samenvoegen naar het Werkboeklijst;
2) Controleer de werkmapnaam waarmee u de bladen wilt samenvoegen, u kunt meerdere werkmappen kiezen;
3) Vink de werkbladen aan die u met elkaar wilt combineren;
4) Klik op doc selecteren om het bereik te selecteren dat u wilt combineren, als de bereiken op dezelfde locatie van elk blad zijn geplaatst, hoeft u slechts één bereik uit een blad te selecteren en vervolgens op te klikken Zelfde bereik.

3. klikken Volgende >> aan de Werkblad combineren - Stap 3 van 3 wizard en controleer Combineer per rij optie en het type 1 in het tekstvak van Titel rij nummer, als er geen titel in uw bereik is, typ er dan een 0 in.

doc kutools combineren 4

4. klikken Finish, en er verschijnt een dialoogvenster om u eraan te herinneren dit scenario op te slaan. Als u het wilt opslaan, klikt u op Jaof Nee.

doc combineren dezelfde koptekst 17

Nu worden de bladen samengevoegd met dezelfde rijkoppen in een nieuwe werkmap.

doc combineren dezelfde koptekst 18

Consolideer meerdere bladen met dezelfde kopteksten

Na het installeren van Kutools voor Excel, doe het als volgt:(Download nu Kutools voor Excel!)

1. klikken Enterprise > Combineren om de Combine-wizard weer te geven en vink aan Consolideer en bereken waarden over meerdere werkmappen in één werkblad. Zie screenshot:
doc kutools combineren 5

2. klikken Volgende>> naar de Combineer werkbladen - Stap 2 van 3 wizard, en doe zoals hieronder:

doc kutools combineren 3
1) Klik op Toevoegen > Bestandsmap om de werkmappen toe te voegen waaruit u werkbladen kunt samenvoegen naar het Werkboeklijst;
2) Controleer de werkmapnaam waarmee u de bladen wilt samenvoegen, u kunt meerdere werkmappen kiezen;
3) Vink de werkbladen aan die u met elkaar wilt combineren;
4) Klik op doc selecteren om het bereik te selecteren dat u wilt combineren, als de bereiken op dezelfde locatie van elk blad zijn geplaatst, hoeft u slechts één bereik uit een blad te selecteren en vervolgens op te klikken Zelfde bereik.

3. Blijf klikken Volgende>>, en selecteer de functie die u wilt toepassen in het samengevoegde bereik, en controleer de labels voor uw samengevoegde bereik. Zie screenshot:
doc kutools combineren 6

4. klikken Finish, en er verschijnt een dialoogvenster waarin u wordt gevraagd het scenario op te slaan, klik op Ja om op te slaan, of klik op Nee om het niet te redden.

Vervolgens worden de bereiken geconsolideerd in een nieuwe werkmap.

doc combineren dezelfde koptekst 12

Het voordeel van Kutools for Excel's Combineren functie is dat u meerdere bladen van geopende werkmappen of ongeopende werkmappen kunt samenvoegen tot één werkblad of één werkmap.

Combineer / consolideer eenvoudig gegevens op basis van dezelfde waarde in Excel

Stel dat u met een werkblad werkt dat meerdere dubbele records bevat, en nu moet u de rijen combineren / samenvoegen op basis van dezelfde waarde en enkele berekeningen uitvoeren, zoals de som, het gemiddelde, het aantal dubbele rijen. Hiermee Geavanceerd Combineer rijen of Kutools for Excel, kunt u snel dezelfde waarden / dezelfde gegevens of dubbele rijen combineren in de juiste cellen.  Klik voor een gratis proefversie met alle functies binnen 30 dagen!
doc geavanceerd combineren rijen
 
Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen.

Relatieve artikelen

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
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