Hoe maak je werkbladen met reeksen aan vanuit een bereik van cellen in Excel?
Als je een bereik met gegevens hebt in je werkblad en nu een reeks werkbladen wilt maken op basis van de celgegevens, zie onderstaande schermafbeelding. Natuurlijk kun je de naam van elk werkblad handmatig één voor één bewerken, maar als er meerdere werkbladnamen moeten worden aangepast, wordt dit een omslachtig en tijdrovend proces. Hier zal ik het hebben over enkele snelle trucs om je te helpen.
Maak werkbladen met reeksen aan vanuit een lijst met cellen met VBA-code
Maak werkbladen met reeksen aan vanuit een lijst met cellen met Kutools voor Excel
Maak werkbladen met reeksen aan vanuit een lijst met cellen met VBA-code
De volgende VBA-code kan je helpen om werkbladen toe te voegen die zijn vernoemd op basis van de celinhoud na de bestaande werkbladen. Doe het volgende:
1. Houd de toetsen ALT + F11 ingedrukt, waarna het venster Microsoft Visual Basic for Applications wordt geopend.
2. Klik op Invoegen > Module en plak de volgende code in het Modulevenster.
VBA-code: voeg werkbladen met reeksen toe op basis van een lijst met cellen
Sub CreateWorkSheetByRange()
'Update 20130829
Dim WorkRng As Range
Dim Ws As Worksheet
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
arr = WorkRng.Value
Application.ScreenUpdating = False
For i = 1 To UBound(arr, 1)
For j = 1 To UBound(arr, 2)
Set Ws = Worksheets.Add(after:=Application.ActiveSheet)
Ws.Name = arr(i, j)
Next
Next
Application.ScreenUpdating = True
End Sub
3. Druk vervolgens op de F5-toets om deze code uit te voeren, en er verschijnt een pop-upvenster waarin je wordt gevraagd het bereik te selecteren dat je wilt gebruiken. Zie onderstaande schermafbeelding:
4. Klik vervolgens op OK, en de werkbladen die zijn vernoemd naar de celwaarden zijn toegevoegd na het bestaande werkblad. Zie onderstaande schermafbeelding:
Opmerkingen:
1. De nieuwe werkbladen worden ingevoegd na het huidige werkblad.
2. Als het geselecteerde bereik lege cellen bevat, worden de werkbladen op basis van standaardinstellingen vernoemd. Zie onderstaande schermafbeeldingen:
 |
 |
 |
Maak werkbladen met reeksen aan vanuit een lijst met cellen met Kutools voor Excel
Hier introduceer ik een handig hulpmiddel - Kutools voor Excel. Met Werkbladen met reeks maken kun je snel werkbladen maken met maandnamen, dagnamen, aangepaste lijsten en meer.
Kutools voor Excel omvat meer dan 300 handige Excel-hulpmiddelen. Gratis uitproberen zonder beperking gedurende 30 dagen. Download het nu.
Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:
1. Selecteer het bereik waarop je de werkbladen wilt maken.
2. Klik op Kutools Plus > Werkblad > Werkbladen met reeks maken, zie onderstaande schermafbeelding:
3. In het dialoogvenster Werkbladen met reeks maken, kies het type werkblad dat je wilt maken en vink daarna Gegevens binnen selectie aan, zie onderstaande schermafbeelding:
4. Klik vervolgens op OK om het dialoogvenster te sluiten, en er is een nieuw werkboek aangemaakt dat de werkbladen bevat die zijn vernoemd naar de geselecteerde bereikgegevens. Zie onderstaande schermafbeelding:
Opmerkingen:
1. Als je Blad 1 of Blad 2 selecteert, worden de nieuwe werkbladen aangemaakt met dezelfde opmaak als Blad 1 of Blad 2.
2. De nieuwe werkbladen worden aangemaakt in een nieuw werkboek.
3. Als het geselecteerde bereik lege cellen bevat, worden de werkbladen op basis van standaardinstellingen vernoemd. Zie onderstaande schermafbeeldingen:
 |
|
 |
Klik hier om meer te weten te komen over deze functie Werkbladen met reeks maken.
Gerelateerd artikel:
Hoe voeg je nieuwe werkbladen toe met aangepaste namen in Excel?
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen