Wie erstelle ich Arbeitsblätter für Sequenzen aus einer Reihe von Zellen in Excel?
Wenn Ihr Arbeitsblatt eine Reihe von Daten enthält und Sie jetzt eine Folge von Arbeitsblättern basierend auf den Zellendaten erstellen möchten, siehe folgenden Screenshot. Natürlich können Sie den Arbeitsblattnamen einzeln manuell bearbeiten. Wenn jedoch mehrere Arbeitsblattnamen bearbeitet werden müssen, ist dies auf diese Weise mühsam und zeitaufwändig. Hier werde ich über einige schnelle Tricks sprechen, die Ihnen helfen sollen.
Erstellen Sie Sequenzarbeitsblätter aus der Liste der Zellen mit VBA-Code
Erstellen Sie mit Kutools for Excel Sequenzarbeitsblätter aus der Liste der Zellen
Erstellen Sie Sequenzarbeitsblätter aus der Liste der Zellen mit VBA-Code
Mit dem folgenden VBA-Code können Sie einige Arbeitsblätter hinzufügen, die basierend auf dem Zelleninhalt nach vorhandenen Arbeitsblättern benannt sind. Bitte machen Sie Folgendes:
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, dann öffnet es die Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Fügen Sie Sequenzarbeitsblätter basierend auf der Liste der Zellen hinzu
Sub CreateWorkSheetByRange()
'Update 20130829
Dim WorkRng As Range
Dim Ws As Worksheet
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
arr = WorkRng.Value
Application.ScreenUpdating = False
For i = 1 To UBound(arr, 1)
For j = 1 To UBound(arr, 2)
Set Ws = Worksheets.Add(after:=Application.ActiveSheet)
Ws.Name = arr(i, j)
Next
Next
Application.ScreenUpdating = True
End Sub
3. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Eingabeaufforderungsfeld angezeigt, in dem Sie den Bereich auswählen können, den Sie verwenden möchten. Siehe Screenshot:
4. Und dann klick OKDie Arbeitsblätter, die nach den Zellenwerten benannt sind, wurden nach dem vorhandenen Arbeitsblatt hinzugefügt. Siehe Screenshot:
Anmerkungen:
1. Die neuen Arbeitsblätter werden nach dem aktuellen Arbeitsblatt eingefügt.
2. Wenn der ausgewählte Bereich leere Zellen enthält, werden die Arbeitsblätter standardmäßig benannt. Siehe Screenshots:
Erstellen Sie mit Kutools for Excel Sequenzarbeitsblätter aus der Liste der Zellen
Hier stelle ich ein handliches Werkzeug vor -Kutools for ExcelMit seinen Erstellen Sie Sequenzarbeitsblätterkönnen Sie schnell Arbeitsblätter mit Monatsnamen, Tagesnamen, benutzerdefinierten Listen usw. erstellen.
Kutools for Excel Enthält mehr als 300 praktische Excel-Tools. Kostenlos ohne Einschränkung in 30 Tagen zu versuchen. Starten Sie jetzt.
Führen Sie nach der Installation von Kutools for Excel die folgenden Schritte aus:
1. Wählen Sie den Bereich aus, auf dessen Grundlage Sie Arbeitsblätter erstellen möchten.
2. Klicken Sie auf Kostenlos erhalten und dann auf Installieren. Unternehmen > Arbeitsblatt-Tools > Erstellen Sie Sequenzarbeitsblätter, siehe Screenshot:
3. In dem Erstellen Sie Sequenzarbeitsblätter Wählen Sie im Dialogfeld den Arbeitsblatttyp aus, für den Sie die neuen Sequenzarbeitsblätter erstellen möchten, und überprüfen Sie ihn Daten in einem Bereich Option, siehe Screenshot:
4. Dann klick OK Um das Dialogfeld zu schließen, wurde eine neue Arbeitsmappe erstellt, die die Arbeitsblätter enthält. Sie wurde nach den ausgewählten Bereichsdaten benannt. Siehe Screenshot:
Anmerkungen:
1. Wenn Sie Blatt 1 oder Blatt 2 auswählen, werden die neu erstellten Arbeitsblätter in derselben Formatierung wie Blatt 1 oder Blatt 2 erstellt.
2. Die neuen Arbeitsblätter werden in einer neuen Arbeitsmappe erstellt.
3. Wenn der ausgewählte Bereich leere Zellen enthält, werden die Arbeitsblätter standardmäßig benannt. Siehe Screenshots:
Klicken Sie hier, um mehr über diese Funktion zum Erstellen von Sequenzarbeitsblättern zu erfahren.
In Verbindung stehender Artikel:
Wie füge ich neue Arbeitsblätter mit benutzerdefinierten Namen in Excel hinzu?
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!