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!