Wie erstelle ich mehrere Arbeitsblätter aus einer Liste von Zellenwerten?
Gibt es schnelle oder einfache Methoden, um mehrere Arbeitsblätter basierend auf einer Liste von Zellenwerten in Excel zu erstellen? In diesem Artikel werde ich über einige gute Tricks sprechen, um diesen Job zu lösen.
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellenwerten mit VBA-Code
Erstellen Sie mit Kutools for Excel mehrere Arbeitsblätter aus einer Liste von Zellenwerten
Erstellen Sie mehrere Arbeitsblätter aus einer Liste von Zellenwerten mit VBA-Code
Der folgende VBA-Code kann Ihnen helfen, um schnell mehrere neue Arbeitsblätter zu erstellen, die mit einer Liste von Zellenwerten benannt sind.
1. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
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
Note: Im obigen Code, A1: A7 Ist der Zellbereich, auf dessen Grundlage Sie Blätter erstellen möchten, ändern Sie ihn bitte nach Ihren Wünschen.
3. Dann drücken F5 Schlüssel zum Ausführen dieses Codes, und die neuen Blätter wurden erstellt, nachdem alle Blätter in der aktuellen Arbeitsmappe angezeigt wurden (siehe Screenshot:
Erstellen Sie mit Kutools for Excel mehrere Arbeitsblätter aus einer Liste von Zellenwerten
Wenn Sie mit dem obigen Code nicht vertraut sind, finden Sie hier ein praktisches Tool:Kutools for ExcelMit seinen Erstellen Sie Sequenzarbeitsblätter Funktion werden die Arbeitsblätter basierend auf den Zellenwerten in einer neuen Arbeitsmappe erstellt.
Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Nach der Installation Kutools for ExcelBitte machen Sie Folgendes:
1. Klicken Sie Kutoolen Plus > Arbeitsblatt > Erstellen Sie Sequenzarbeitsblätter, siehe Screenshot:
2. In dem Erstellen Sie Sequenzarbeitsblätter Dialogbox:
(1.) Wählen Sie ein Arbeitsblatt aus, auf dessen Grundlage Sie Sequenzarbeitsblätter erstellen möchten.
(2.) Dann wählen Sie Datum in einer Bereichsoption von der Blattnamen basierend auf Listenfeld und klicken Sie auf Schaltfläche, um die Zellenwerte auszuwählen, die Sie verwenden möchten.
3. Und dann klick Ok Schaltfläche, wurden die Arbeitsblätter mit den Namen der Zellenwerte in einer neuen Arbeitsmappe erstellt, siehe Screenshot:
Klicken Sie auf Download und kostenlose Testversion von Kutools for Excel Now!
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!