Wie erstellt man mehrere Arbeitsblätter aus einer Liste von Zellwerten?
Gibt es schnelle oder einfache Methoden, um in Excel mehrere Arbeitsblätter auf Basis einer Liste von Zellwerten zu erstellen? In diesem Artikel werde ich über einige gute Tricks sprechen, um diese Aufgabe zu lösen.
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellwerten mit VBA-Code
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellwerten mit Kutools für Excel
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellwerten mit VBA-Code
Um schnell mehrere neue Arbeitsblätter zu erstellen, die nach einer Liste von Zellwerten benannt sind, kann Ihnen der folgende VBA-Code helfen.
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code im Modulfenster ein.
VBA-Code: Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellen:
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
Hinweis: Im obigen Code ist A1:A7 der Zellbereich, auf dessen Basis Sie Blätter erstellen möchten. Ändern Sie ihn bitte entsprechend Ihren Bedürfnissen.
3. Drücken Sie dann die Taste F5, um diesen Code auszuführen, und die neuen Blätter wurden nach allen Blättern in der aktuellen Arbeitsmappe erstellt, siehe Screenshot:
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellwerten mit Kutools für Excel
Wenn Sie mit dem obigen Code nicht vertraut sind, gibt es hier ein praktisches Tool - Kutools für Excel. Mit seiner Funktion „Sequenzarbeitsblätter erstellen“ werden die Arbeitsblätter basierend auf den Zellwerten in einer neuen Arbeitsmappe erstellt.
Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:
1. Klicken Sie auf Kutools Plus > Arbeitsblatt > Sequenzarbeitsblätter erstellen, siehe Screenshot:
2. Im Dialogfeld „Sequenzarbeitsblätter erstellen“:
(1.) Wählen Sie ein Arbeitsblatt aus, auf dessen Basis Sie Sequenzarbeitsblätter erstellen möchten;
(2.) Wählen Sie dann Daten in einem Bereichsoption aus dem Arbeitsblattname basierend auf Auswahlliste und klicken Sie auf die Schaltfläche, um die Zellwerte auszuwählen, die Sie verwenden möchten.
3. Klicken Sie anschließend auf die Schaltfläche OK, und die Arbeitsblätter wurden mit den Namen der Zellwerte in einer neuen Arbeitsmappe erstellt, siehe Screenshot:
Klicken Sie hier, um Kutools für Excel herunterzuladen und eine kostenlose Testversion zu starten!
Beste Büroproduktivitätswerkzeuge
Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!