KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Werkbladen samenvoegen met dezelfde naam uit meerdere werkmappen samenvoegen tot één

AuteurXiaoyang Wijzigingsdatum

Het samenvoegen van gegevens uit meerdere Excel-werkmappen naar één werkblad is een veelvoorkomende vereiste in data-analyse, met name bij geconsolideerde rapportage of het aggregeren van gegevens uit verschillende bronnen. Dit kan bijzonder lastig zijn wanneer u werkbladen moet samenvoegen die dezelfde naam dragen in verschillende werkmappen. In deze handleiding worden twee effectieve methoden beschreven om dit proces te stroomlijnen: het gebruik van VBA-code voor gebruikers die een programmeerbare, hands-on aanpak prefereren, en Kutools voor Excel voor wie kiest voor een gebruiksvriendelijke, geautomatiseerde oplossing.

Werkbladen samenvoegen met dezelfde naam samenvoegen tot één met VBA-code

In dit gedeelte vindt u een VBA-code om werkbladen met dezelfde naam uit meerdere werkmappen samen te voegen in één werkblad. Volg hiervoor de onderstaande stappen:

  1. Druk op Alt + F11 om de VBA-editor te openen.
  2. Klik in de VBA-editor op „Invoegen” > „Module” en voer vervolgens de volgende VBA-code in de module in.
    VBA-code: Werkboeken samenvoegen met dezelfde naam samenvoegen tot één
    Sub CombineSameNameSheetsFromMultipleWorkbooks()
'Updated by Extendoffice 2025/3/27
    Dim wsTarget As Worksheet
    Dim wbTarget As Workbook
    Dim wbSource As Workbook
    Dim wsSource As Worksheet
    Dim strSheetName As String
    Dim fd As FileDialog
    Dim FileChosen As Integer
    Dim FileName As String
    Dim lastRow As Long

    ' Set the name of the sheets to combine
    strSheetName = "SheetName" ' Change "SheetName" to the name of your sheet

    Set wbTarget = Workbooks.Add
    Set wsTarget = wbTarget.Sheets(1)
    wsTarget.Name = "Combined Data"

    Set fd = Application.FileDialog(msoFileDialogFilePicker)
    fd.AllowMultiSelect = True

    FileChosen = fd.Show
    If FileChosen = -1 Then
        For Each varFile In fd.SelectedItems
            Set wbSource = Workbooks.Open(varFile)
            
            On Error Resume Next
            Set wsSource = wbSource.Sheets(strSheetName)
            On Error GoTo 0
            
            If Not wsSource Is Nothing Then
                lastRow = wsTarget.Cells(wsTarget.Rows.Count, 1).End(xlUp).Row
                
                wsSource.UsedRange.Copy Destination:=wsTarget.Cells(lastRow + 1, 1)
                
                Set wsSource = Nothing
            End If
            wbSource.Close False
        Next varFile
    End If
    MsgBox "Data has been combined successfully!", vbInformation
End Sub
    Opmerking: Voordat u de code uitvoert, moet u „SheetName” in de variabele „strSheetName” wijzigen naar de werkelijke naam van de werkbladen die u wilt combineren.
    screenshot met SheetName in de coderegel
  3. Druk op F5 om de code uit te voeren. Er verschijnt een venster met de titel ‘Selecteer de Excel-bestanden’: kies hierin de werkmappen die werkbladen met dezelfde naam bevatten die u wilt combineren en klik op ‘Openen’.
    screenshot van het selecteren van werkmappen
  4. Zodra het samenvoegen is voltooid, verschijnt een Microsoft Excel-dialoogvenster ter bevestiging dat de werkbladen succesvol zijn gecombineerd. Klik op OK om het venster te sluiten.
    screenshot van het samenvoegen-succesmeldingsvenster

De inhoud van alle werkbladen met dezelfde naam uit de geselecteerde werkmappen is nu samengevoegd in één nieuw werkblad.

Opmerking: Deze VBA-code kan meerdere werkbladen met dezelfde naam niet samenvoegen.

Werkbladen met dezelfde naam eenvoudig samenvoegen tot één met Kutools voor Excel

Hoewel VBA krachtige automatiseringsmogelijkheden biedt in Excel, kan het complex en ontmoedigend zijn voor gebruikers zonder programmeervaardigheden. Bovendien vraagt VBA om zorgvuldige beveiligingspraktijken en kan het compatibiliteitsproblemen veroorzaken. „Kutools voor Excel” biedt daarentegen een gebruiksvriendelijk en veilig alternatief dat het samenvoegen van werkbladen uit meerdere werkmappen eenvoudig maakt — zonder ingewikkelde code, zodat iedere Excel-gebruiker de taak moeiteloos kan uitvoeren.

Kutools voor Excel – Vol met meer dan 300 essentiële hulpmiddelen voor Excel. Maak uw Excel-taken sneller, eenvoudiger en efficiënter.Download nu!

Na installatie van Kutools voor Excel kiest u „KUTOOLS PLUS” > „Combineren” om de wizard „Werkbladen samenvoegen” te openen. Configureer deze vervolgens als volgt.

  1. Selecteer in de wizard „Werkbladen samenvoegen – Stap 1 van 3” de optie „Gegevens samenvoegen vanuit meerdere werkmappen met dezelfde werkbladnaam” en klik op „Volgende”.
    screenshot van de stap-1-assistent
  2. Klik in de wizard „Stap 2 van 3” op de knop „Toevoegen” om de werkmappen te selecteren die de werkbladen met dezelfde naam bevatten die u wilt combineren.
    Opmerking: Als de werkmappen zijn opgeslagen in een map, kunt u op de pijl naast de knop „Toevoegen” klikken om het submenu uit te klappen en vervolgens „Map” selecteren om snel alle Excel-bestanden uit die map toe te voegen.
    screenshot van de stap-2-assistent
  3. Nadat u de werkmappen hebt toegevoegd, heeft u twee opties, afhankelijk van uw behoeften:
    • Als u alle werkbladen van de geselecteerde werkmappen in één werkmap wilt combineren, klikt u eenvoudigweg op de knop „Volgende”. Alle werkbladen worden dan samengevoegd, en de inhoud van werkbladen met dezelfde naam wordt automatisch verenigd tot één werkblad.
    • Als u alleen werkbladen met dezelfde naam wilt combineren, vinkt u eerst **Selecteer een werkblad** aan in het gedeelte „Werkbladlijst” en klikt u daarna op de knop **Gelijknamig werkblad**. Hiermee worden automatisch alle werkbladen met die naam uit de toegevoegde werkmappen geselecteerd. Klik vervolgens op **Volgende** om door te gaan.
    screenshot van het selecteren van alleen het werkblad met dezelfde naam
  4. Selecteer in de laatste stap van de wizard of u de standaardoptie wilt gebruiken of de instellingen aan uw wensen aanpast, en klik op „Voltooien”.
    screenshot van de stap-3-assistent
  5. Kies een doelmap voor de gecombineerde werkmap, geef desgewenst een bestandsnaam op en klik op „Opslaan” om de handeling te voltooien.
    screenshot van het selecteren van een doelmap

Het combineren van werkbladen met dezelfde naam uit meerdere werkmappen verloopt efficiënt met de juiste hulpmiddelen. Of u nu kiest voor ingebouwde methoden of geavanceerde invoegtoepassingen – beide benaderingen bieden betrouwbare oplossingen die aansluiten bij elk vaardigheidsniveau. Door deze technieken onder de knie te krijgen, verhoogt u uw productiviteit aanzienlijk en stroomlijnt u het consolidatieproces van uw gegevens in Excel.

Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen

Wilt u meer weten over deze functie? Bekijk dan deze pagina:Gegevens samenvoegen vanuit meerdere werkmappen met dezelfde werkbladnaam: handleiding.

Gerelateerde artikelen:

Hoe combineert u meerdere werkmappen tot één enkele werkmap in Excel?

Hoe voegt u werkbladen of werkmappen samen tot één werkblad?

Hoe combineert u gegevens uit meerdere werkbladen of werkmappen tot één overzichtelijk werkblad?

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan…
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

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

Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins