Hur skapar jag flera kalkylblad från en lista över cellvärden?

Finns det några snabba eller enkla metoder för oss att skapa flera kalkylblad baserat på en lista över cellvärden i Excel? I den här artikeln kommer jag att prata om några bra knep för att lösa detta jobb.

Skapa flera kalkylblad från en lista över cellvärden med VBA-kod

Skapa flera kalkylblad från en lista över cellvärden med Kutools för Excel

Skapa flera kalkylblad från en lista över cellvärden med VBA-kod

För att snabbt skapa flera nya kalkylblad som heter med en lista över cellvärden kan följande VBA-kod hjälpa dig.

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.

VBA-kod: Skapa flera kalkylblad från en lista med celler:

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

Anmärkningar: I ovanstående kod, A1: A7 är det cellområde som du vill skapa ark baserat på, ändra det till ditt behov.

3. Tryck sedan på F5 nyckel för att köra den här koden, och de nya arken har skapats efter alla ark i aktuell arbetsbok, se skärmdump:

Skapa flera kalkylblad från en lista över cellvärden med Kutools för Excel

Om du inte är skicklig med ovanstående kod, här är ett praktiskt verktyg-Kutools för Excel, med dess Skapa sekvensarbetsblad funktion, kommer kalkylbladet att skapas baserat på cellvärdena i en ny arbetsbok.

När du har installerat Kutools för Excel, gör så här:

1. Klicka Kutools Plus > Arbetsblad > Skapa sekvensarbetsblad, se skärmdump:

2. I Skapa sekvensarbetsblad dialog ruta:

(1.) Välj ett kalkylblad som du vill skapa sekvensarbetsblad baserat på;

(2.) Välj sedan Data i ett intervallalternativ från Arknamn baserat på listrutan och klicka för att välja cellvärdena som du vill använda.

3. Och klicka sedan på Ok knapp har kalkylbladet skapats med namnen på cellvärdena i en ny arbetsbok, se skärmdump:

Klicka på Ladda ner och testa gratis Kutools för Excel nu!