Wie erstellt man eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern?

Standardmäßig enthält eine neue Arbeitsmappe in Excel ein einzelnes Arbeitsblatt. Während Sie Blätter manuell hinzufügen oder löschen können, was tun Sie, wenn Sie von Anfang an eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern erstellen möchten? Dieser Leitfaden zeigt Ihnen, wie Sie eine Arbeitsmappe mit der gewünschten Anzahl von Blättern automatisch einrichten.

Erstellen einer neuen Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern mithilfe von VBA-Code

Erstellen einer neuen Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern mithilfe von Kutools für Excel

Erstellen einer neuen Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern mithilfe von VBA-Code

Sie können den folgenden VBA-Code verwenden, um eine neue Arbeitsmappe zu erstellen, die eine bestimmte Anzahl von Tabs enthält.

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: Neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern erstellen

Sub MakeWorkbook()
'update Extendoffice
    Dim xOldCount As Integer
    Dim xNewCount As Variant
    xOldCount = Application.SheetsInNewWorkbook
    xNewCount = Application.InputBox("How many sheets in the new workbook do you want?", "Kutools for Excel", , , , , , 1)
    If xNewCount = False Then Exit Sub
    If (xNewCount < 1) Or (CLng(xNewCount) > 255) Then
        MsgBox "The number must be between 1 and 255!"
        Exit Sub
    End If
    With Application
        .SheetsInNewWorkbook = xNewCount
        .Workbooks.Add
        .SheetsInNewWorkbook = xNewCount
    End With
End Sub

3. Nachdem Sie den Code eingefügt haben, drücken Sie die F5-Taste, um diesen Code auszuführen, und geben Sie im Eingabefeld bitte die Anzahl der gewünschten Blätter in der Arbeitsmappe ein, siehe Screenshot:

4. Klicken Sie dann auf die Schaltfläche OK, und die neue Arbeitsmappe wird mit der angegebenen Anzahl von Blättern erstellt.

Erstellen einer neuen Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern mithilfe von Kutools für Excel

Wenn Sie mit dem VBA-Code nicht vertraut sind, können Sie ein praktisches Tool verwenden – Kutools für Excel. Mit der Funktion Sequenzarbeitsblätter erstellen können Sie schnell eine neue Arbeitsmappe mit Standard-Arbeitsblattnamen, benutzerdefinierten Arbeitsblattnamen usw. erstellen.

Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:

1. Klicken Sie auf Enterprise > Arbeitsblatt > Sequenzarbeitsblätter erstellen, siehe Screenshot:

2. Führen Sie im Dialogfeld Sequenzarbeitsblätter erstellen die folgenden Aktionen aus:

(1.) Wählen Sie unter der Dropdown-Liste Basierend auf Arbeitsblatt die Option Leeres Arbeitsblatt aus;

(2.) Geben Sie die Anzahl der Blätter innerhalb der neuen Arbeitsmappe im Textfeld Anzahl der zu erstellenden Arbeitsblätter ein;

(3.) Wählen Sie im Abschnitt Arbeitsblattname basierend auf die Option Standardname in Excel.

3. Klicken Sie dann auf die Schaltfläche OK, und die neue Arbeitsmappe wird mit Ihrer spezifischen Anzahl von Arbeitsblättern erstellt.

Klicken Sie hier, um mehr über diese Funktion Sequenzarbeitsblätter erstellen zu erfahren…

Verwandte Artikel:

Wie erstellt man Sequenzarbeitsblätter aus einem Zellbereich in Excel?

Wie fügt man ein neues Arbeitsblatt mit dem aktuellen Datum in Excel hinzu?