Wie erstelle ich eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern?
Wenn Sie eine neue Arbeitsmappe erstellen, enthält diese normalerweise standardmäßig drei Arbeitsblätter in Excel 2007/2010 oder ein Blatt in Excel 2013. Später können Sie die Registerkarten nach Bedarf hinzufügen oder löschen. Aber haben Sie jemals versucht, jedes Mal eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern zu erstellen?
Erstellen Sie mithilfe von VBA-Code eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern
Mit dem folgenden VBA-Code können Sie eine neue Arbeitsmappe mit einer bestimmten Anzahl von Registerkarten erstellen.
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 eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern
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 between 1 and 255!"
Exit Sub
End If
With Application
.SheetsInNewWorkbook = xNewCount
.Workbooks.Add
.SheetsInNewWorkbook = xNewCount
End With
End Sub
3. Drücken Sie nach dem Einfügen des Codes F5 Geben Sie die Taste zum Ausführen dieses Codes ein und geben Sie im Eingabeaufforderungsfeld die Anzahl der gewünschten Blätter in die Arbeitsmappe ein (siehe Abbildung):
4. Dann klick OK Schaltfläche, wurde die neue Arbeitsmappe mit der angegebenen Anzahl von Blättern erstellt, die Sie benötigen.
Erstellen Sie mit Kutools for Excel eine neue Arbeitsmappe mit einer bestimmten Anzahl von Arbeitsblättern
Wenn Sie mit dem VBA-Code nicht vertraut sind, können Sie ein praktisches Tool anwenden - Kutools for ExcelMit seinen Erstellen Sie Sequenzarbeitsblätter Mit diesem Dienstprogramm können Sie schnell eine neue Arbeitsmappe mit Standardblattnamen, benutzerdefinierten Blattnamen usw. erstellen.
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 gehen Sie wie folgt vor:
1. Klicken Sie Unternehmen > Arbeitsblatt > Erstellen Sie ein Sequenzarbeitsblatt, siehe Screenshot:
2. Im Erstellen Sie Sequenzarbeitsblätter Führen Sie im Dialogfeld die folgenden Vorgänge aus:
(1.) Wählen Sie Leeres Arbeitsblatt unter dem Basisarbeitsblatt Dropdown-Liste;
(2.) Geben Sie die Anzahl der Blätter in der neuen Arbeitsmappe unter ein Die Anzahl der erstellen Textfeld;
(3.) Aus dem Blattnamen basierend auf Abschnitt auswählen Excel-Standardname .
3. Dann klick OK Klicken Sie auf die Schaltfläche, und die neue Arbeitsmappe wird mit Ihrer spezifischen Anzahl von Arbeitsblättern erstellt.
Laden Sie Kutools for Excel jetzt kostenlos herunter
In Verbindung stehende Artikel:
Wie erstelle ich Arbeitsblätter für Sequenzen aus einer Reihe von Zellen in Excel?
Wie füge ich ein neues Arbeitsblatt mit dem aktuellen Datum 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!