In ons dagelijkse werk kunnen we een probleem tegenkomen waarbij honderden bladen of werkmappen worden samengevoegd tot één blad voor het analyseren van gegevens, wat veel tijd kost als u de opdracht Kopiëren en Plakken in Excel gebruikt. Hier in deze tutorial zal ik enkele tips geven om deze klus snel op te lossen.
SNELLE NAVIGATIE >Alle bladen met een actieve werkmap samenvoegen tot één blad met VBA >Tientallen bladen of werkmappen samenvoegen tot één werkblad / werkmap met klikken >Twee tabellen samenvoegen tot één en bijwerken door een kolom met klikken >Download voorbeeldbestand

In deze sectie geef ik een VBA-code waarmee een nieuw blad wordt gemaakt om alle bladen van de actieve werkmap te verzamelen terwijl u deze uitvoert.

1. Activeer de werkmap waarvan u alle bladen wilt combineren en druk op anders + F11 sleutels om te openen Microsoft Visual Basic voor toepassingen venster.

2. Klik in het pop-upvenster op Invoegen > Module om een ​​nieuw modulescript te maken.

3. Kopieer onderstaande code en plak ze in het script.

Sub Combine() 'UpdatebyExtendoffice Dim J As Integer On Error Resume Next Sheets(1).Select Worksheets.Add Sheets(1).Name = "Combined" Sheets(2).Activate Range("A1").EntireRow.Select Selection.Copy Destination:=Sheets(1).Range("A1") For J = 2 To Sheets.Count Sheets(J).Activate Range("A1").Select Selection.CurrentRegion.Select Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2) Next End Sub

4. druk op F5 -toets, dan zijn alle gegevens over de bladen samengevoegd in een nieuw blad met de naam Gecombineerd dat voor alle bladen wordt geplaatst.

Wilt u een loonsverhoging en veel tijd om met uw gezin te begeleiden? Office-tabblad verbetert uw efficiëntie met 50% in Microsoft Office dat nu werkt Ongelofelijk, werken aan twee of meer documenten is gemakkelijker en sneller dan werken aan één. In vergelijking met bekende browsers is de tool met tabbladen in Office Tab krachtiger en efficiënter. Verminder elke dag honderden muisklikken en typen op het toetsenbord, zeg nu gedag tegen de muishand. Als u gewoonlijk aan meerdere documenten werkt, bespaart Office Tab u veel tijd. 30-dag gratis op proef, geen kredietkaart nodig. Lees meerGratis nu downloaden

Met de VBA kunt u alleen bladen in de actieve werkmap combineren, maar hoe kunt u bladen uit werkmappen samenvoegen tot een blad of werkmap?

Voeg bladen uit werkmappen samen tot één blad

Voeg bladen uit werkmappen samen in één werkmap

Voor het oplossen van deze klus en om te voldoen aan andere eisen aan vellencombinaties, is de Combineren functie is ontwikkeld met vier combinatiescenario's:

• Combineer meerdere bladen of werkmappen in één blad
• Combineer meerdere bladen of werkmappen in één werkmap
• Combineer bladen met dezelfde naam in één blad
• Consolideer waarden over bladen of werkmappen in één blad

Hier neemt de tweede optie als voorbeeld:

Combineer meerdere bladen of werkmappen in één werkmap

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. Activeer Excel, klik op Koetools Plus > Combineren, verschijnt er een dialoogvenster om u eraan te herinneren dat de werkmappen die u wilt combineren, moeten worden gesloten. Klik OK te gaan.

2. In de Combineer werkbladen stap 1 dialoogvenster, vink aan Combineer meerdere werkbladen uit werkmappen in één werkmap keuze. Klik Volgende om naar de volgende stap van de wizard te gaan.

3. klikken Toevoegen > Dien in or Map om de werkmappen die u wilt combineren toe te voegen aan het Werkboeklijst paneel, dan kunt u aangeven welk werkblad zal worden samengevoegd door namen in te checken Werkblad lijst paneel. Klik Volgende om naar de laatste stap van de wizard te gaan.

4. Geef in deze stap de gewenste instellingen op. Dan klikken Finish.

5. Er verschijnt een venster waarin u een map selecteert om de gecombineerde werkmap in te plaatsen, en klik vervolgens op Bespaar.

Nu zijn de werkmappen samengevoegd tot één werkmap. En aan de voorkant van alle bladen wordt ook een hoofdblad met de naam Kutools voor Excel gemaakt met wat informatie over de bladen en koppelingen voor elk blad.

Free Trial Zeg nu gedag tegen muishand en cervicale spondylose

300 geavanceerde tools van Kutools voor Excel oplossen 80% Excel-taken in seconden, haal je uit de duizenden muisklikken.

Ga gemakkelijk om met 1500 werkscenario's, u hoeft geen tijd te verspillen aan het zoeken naar oplossingen, u heeft veel tijd om van uw leven te genieten. Verbeter elke dag de productiviteit van 80% voor meer dan 110000 zeer effectieve mensen, natuurlijk ook voor u. Niet langer gekweld worden door pijnlijke formules en VBA, geef uw hersenen een rustgevende en vreugdevolle werkstemming. 30-daagse gratis proefperiode met alle functies, 30-dag geld terug zonder opgaaf van reden. Een beter lichaam zorgt voor een beter leven.

Lees meer Nu downloaden

Als u twee tabellen tot één wilt samenvoegen en gegevens wilt bijwerken op basis van een kolom zoals hieronder afgebeeld, kunt u het Tabellen samenvoegen nut van Kutools for Excel.

Kutools for Excel: meer dan 200 handige Excel-invoegtoepassingen om gecompliceerde taken met een paar klikken in Excel te vereenvoudigen

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. klikken Koetools Plus > Tabellen samenvoegen in staat te stellen Tabellen samenvoegen wizard.

Kutools for Excel

30-Dag gratis proefperiode 300 geavanceerde tools Oplossen 80% Excel-problemen Verbeter 80% werkefficiëntie Wees een Excel-expert, verkrijg de erkenning van mensen

2. In stap 1 van de wizard moet u de bereiken van de hoofdtabel en de opzoektabel afzonderlijk selecteren. Dan klikken Volgende.

3. Vink de sleutelkolom aan waarvan u de gegevens in de hoofdtabel wilt bijwerken op basis van. Klik Volgende.

4. Controleer vervolgens de kolommen in de hoofdtabel waarvan u de gegevens wilt bijwerken op basis van de opzoektabel. Klik Volgende.

5. Vink in stap 4 van de wizard de kolommen aan die u vanuit de opzoektabel aan de hoofdtabel wilt toevoegen. Klik Volgende.

6. Geef in de laatste stap van de wizard de gewenste instelopties op. Dan klikken Finish.

Nu heeft de hoofdtabel de gegevens bijgewerkt en nieuwe gegevens toegevoegd op basis van de opzoektabel.

Aanbevolen productiviteitstools

Office-tabblad - Bladeren, bewerken en beheren van documenten met tabbladen in Microsoft Office 2019-2003 en Office 365

Gratis proefperiode met volledige functionaliteit in 30 dagen

Een professionele invoegtoepassing voor het versnellen van Excel 2019-2007, uren taken terugbrengen tot seconden

Deze invoegtoepassing omvat tientallen professionele groepen, met meer dan 300 opties automatiseert u de meeste van uw dagelijkse taken in Excel en verhoogt u uw productiviteit met minstens 50%. Zoals groepen optons met één klik en batchconversies.
Nu is het uw kans om uzelf te versnellen met Kutools voor Excel!

Gratis proefperiode met volledige functionaliteit in 60 dagen