Hoe maak je meerdere werkbladen vanuit een lijst met celwaarden?
Zijn er snelle of eenvoudige methoden om meerdere werkbladen te maken op basis van een lijst met celwaarden in Excel? In dit artikel bespreek ik enkele handige trucs om deze taak uit te voeren.
Meerdere werkbladen maken vanuit een lijst met celwaarden met VBA-code
Meerdere werkbladen maken vanuit een lijst met celwaarden met Kutools voor Excel
Meerdere werkbladen maken vanuit een lijst met celwaarden met VBA-code
Om snel meerdere nieuwe werkbladen te maken die vernoemd zijn naar een lijst met celwaarden, kan de volgende VBA-code u helpen.
1. Houd de toetsen ALT + F11 ingedrukt om het Microsoft Visual Basic for Applications-venster te openen.
2. Klik op Invoegen > Module en plak de volgende code in het Modulevenster.
VBA-code: Meerdere werkbladen maken vanuit een lijst met cellen:
Sub AddSheets()
'Updateby Extendoffice
Dim xRg As Excel.Range
Dim wSh As Excel.Worksheet
Dim wBk As Excel.Workbook
Set wSh = ActiveSheet
Set wBk = ActiveWorkbook
Application.ScreenUpdating = False
For Each xRg In wSh.Range("A1:A7")
With wBk
.Sheets.Add after:=.Sheets(.Sheets.Count)
On Error Resume Next
ActiveSheet.Name = xRg.Value
If Err.Number = 1004 Then
Debug.Print xRg.Value & " already used as a sheet name"
End If
On Error GoTo 0
End With
Next xRg
Application.ScreenUpdating = True
End Sub
Opmerking: In de bovenstaande code is A1:A7 het celbereik waarop je werkbladen wilt maken, pas dit aan naar wens.
3. Druk vervolgens op de F5-toets om deze code uit te voeren, en de nieuwe werkbladen zijn aangemaakt na alle werkbladen in het huidige werkboek, zie screenshot:
Meerdere werkbladen maken vanuit een lijst met celwaarden met Kutools voor Excel
Als je niet bekwaam bent in het gebruik van bovenstaande code, hier is een handig hulpmiddel - Kutools voor Excel, met de functie Werkbladen met reeks maken zullen de werkbladen worden gemaakt op basis van de celwaarden in een nieuw werkboek.
Nadat je Kutools voor Excel hebt geïnstalleerd, doe dan het volgende:
1. Klik op Kutools Plus > Werkblad > Werkbladen met reeks maken, zie screenshot:
2. In het dialoogvenster Werkbladen met reeks maken:
(1.) Selecteer een werkblad waarop je de reeks werkbladen wilt maken;
(2.) Selecteer vervolgens Gegevens in een bereikoptie uit de Werkbladnaam gebaseerd op keuzelijst, en klik op de 
knop om de celwaarden te selecteren die je wilt gebruiken.
3. Klik vervolgens op de knop OK, de werkbladen zijn aangemaakt met de namen van de celwaarden in een nieuw werkboek, zie screenshot:
Klik hier om Kutools voor Excel nu te downloaden en gratis te proberen!
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