Wie kopiert man mehrere Blätter mehrmals in Excel?

Excels integrierter Befehl Verschieben oder Kopieren bietet eine einfache Möglichkeit, Arbeitsblätter zu duplizieren. Diese Methode ist hilfreich, wenn Sie eine einzelne Sicherungskopie Ihrer Originaldatenblätter erstellen, ausgewählte Blätter mit Kollegen teilen oder bestimmte Arbeitsblätter in eine andere Datei übertragen möchten. Allerdings ist sie am effektivsten, wenn Sie jeweils nur eine Kopie jedes Arbeitsblatts benötigen, da das Erstellen mehrerer Kopien das manuelle Wiederholen des Prozesses erfordert.

1Wählen Sie im Arbeitsbuch, in das Sie die Arbeitsblätter kopieren möchten, die Blätter aus, die Sie vom Blattregister aus duplizieren möchten.
Hinweis: Halten Sie die Taste STRG gedrückt, um mehrere nicht angrenzende Blattregister auszuwählen, indem Sie auf jedes einzeln klicken. Um eine Reihe angrenzender Blätter auszuwählen, klicken Sie auf das erste Blattregister, halten Sie die Taste UMSCHALTgedrückt und klicken Sie auf das letzte Register in der Sequenz.

2Klicken Sie mit der rechten Maustaste auf ein beliebiges ausgewähltes Register und wählen Sie Verschieben oder Kopieren aus dem Kontextmenü aus. Dadurch wird das Dialogfeld Verschieben oder Kopieren geöffnet.

3Im Verschieben oder Kopieren Dialogfeld passen Sie die folgenden Optionen je nach Ihrer Situation an:
(1) Verwenden Sie das Dropdown-Menü In Buch , um das Arbeitsbuch anzugeben, in das Sie die Blätter kopieren möchten. Sie können das aktuelle (aktive) Arbeitsbuch, ein anderes bereits geöffnetes Arbeitsbuch oder die Option auswählen, die Blätter in einem brandneuen Arbeitsbuch zu erstellen.
(2) Legen Sie den Speicherort für die kopierten Blätter im Feld Vor Blatt fest. In der Regel ist es einfacher, die Kopien nach allen vorhandenen Blättern zu platzieren, damit sie leichter zu finden sind.
(3) Bevor Sie auf OKklicken, vergewissern Sie sich, dass Sie die Option Kopie erstellen aktiviert haben. Wenn Sie dies nicht tun, werden die Blätter verschoben (aus der Originaldatei entfernt) anstatt kopiert.
(4) Klicken Sie auf die Schaltfläche OK , um den Kopiervorgang abzuschließen.

Sobald Sie bestätigen, erstellt Excel eine Kopie jedes ausgewählten Arbeitsblatts im angegebenen Arbeitsbuch und an der gewünschten Stelle.

Wenn Sie mehr als eine Kopie desselben Arbeitsblatts benötigen, wiederholen Sie diesen Vorgang so oft wie nötig. Beachten Sie, dass bei mehrfachen Wiederholungen die Blattnamen inkrementierende Zahlen widerspiegeln (z.B. „Tabelle1 (2)“, „Tabelle1 (3)“), was das Verfolgen der duplizierten Versionen erleichtert.
Anwendbare Szenarien: Besonders geeignet zum Sichern von Originalarbeitsblättern, Verschieben ausgewählter Blätter zwischen Dateien oder zum schnellen Duplizieren einer begrenzten Anzahl von Blättern.
Vorteile: Eingebaute Funktion, keine Add-Ins erforderlich, einfach für einmalige Kopien.
Nachteile: Nicht effizient, wenn mehrere Kopien benötigt werden; manuelle Wiederholung ist für jede zusätzliche Kopie erforderlich.

Tipps & Vorsichtsmaßnahmen:

• Wenn Sie Blätter in eine neue Arbeitsmappe duplizieren, denken Sie daran, die neue Datei unter einem aussagekräftigen Namen zu speichern, um Datenverlust zu vermeiden.
• Bestimmte Verweise oder Formeln, die auf andere Arbeitsblätter verweisen, erfordern möglicherweise Aufmerksamkeit nach dem Kopieren, insbesondere wenn sie in eine neue Datei verschoben wurden.
• Blattschutz, ausgeblendeter Status oder Makros können je nach Einrichtung Ihrer Arbeitsmappe erhalten bleiben oder nicht – überprüfen Sie dies nach dem Kopieren, falls diese Funktionen wichtig sind.

Wenn Sie mehrere Arbeitsblätter innerhalb desselben Arbeitsbuchs mehrfach duplizieren möchten, kann das manuelle Wiederholen des Befehls Verschieben oder Kopieren sehr zeitaufwändig sein. Stattdessen vereinfacht die Funktion „Arbeitsblätter kopieren“ in Kutools für Excel diesen Prozess erheblich – sie ermöglicht es Ihnen, mehrere Kopien mehrerer Arbeitsblätter auf einmal und in einem einzigen Schritt zu erstellen.

1Klicken Sie auf Kutools Plus > Arbeitsblätter kopieren auf der Multifunktionsleiste. Dadurch wird der Assistent zum Kopieren mehrerer Arbeitsblätter geöffnet.

Hinweis: Alternativ können Sie dieselbe Funktion über Kutools Plus > Arbeitsblatt > Arbeitsblätter kopieren.

2im Dialogfeld Mehrere Arbeitsblätter kopieren Ihre Einstellungen vornehmen:
(1) Wählen Sie die zu kopierenden Arbeitsblätter aus, indem Sie sie in der Liste Ausgewählte Arbeitsblätter kopieren auswählen.
(2) Geben Sie an, wie viele Kopien Sie im Feld Anzahl der Kopien erstellen möchten. Geben Sie beispielsweise „3“ ein, um drei Kopien jedes ausgewählten Blatts zu erstellen.
(3) Legen Sie die Position für die neuen kopierten Blätter fest (z.B. nach dem aktuellen Arbeitsblatt, vor allen Arbeitsblättern usw.).
(4) Wenn Sie fertig sind, klicken Sie auf Ok um fortzufahren.

3Ein Bestätigungsdialog erscheint, der Sie darüber informiert, dass die ausgewählten Arbeitsblätter erfolgreich die angegebene Anzahl an Kopien erstellt haben. Klicken Sie auf OK um diesen Hinweis zu schließen.

Diese Funktion macht es extrem bequem, mehrere Arbeitsblätter mehrmals zu duplizieren, ohne repetitive manuelle Schritte durchführen zu müssen.
Anwendbare Szenarien: Hochgradig empfohlen für die effiziente Erstellung von Musterformularen für mehrere Personen, das Stapelkopieren von Blättern für wiederkehrende monatliche Aufgaben oder die schnelle Vorbereitung von Vorlagen für verschiedene Abteilungen.
Vorteile: Zeitersparnis bei Massenvorgängen, einfache Schritte, keine manuelle Wiederholung.
Nachteile: Erfordert die Installation des Add-Ins Kutools für Excel.
Fehlerbehebung & Tipps:

• Wenn Sie alle Blätter auf einmal kopieren möchten, verwenden Sie die Funktion „Alle auswählen“ im Assistenten.
• Überprüfen Sie doppelt, dass die Anzahl der Kopien und die ausgewählten Blätter korrekt sind, bevor Sie bestätigen, da Massenduplikationen gründlich überprüft werden müssen, um Verwirrung zu vermeiden.
• Wenn Ihr Arbeitsbuch geschützt ist, heben Sie den Schutz vorübergehend auf, bevor Sie dieses Tool verwenden, und wenden Sie ihn bei Bedarf anschließend wieder an.

Wenn Sie noch kein Kutools für Excel haben, können Sie die Funktionen des Tools risikofrei mit einer Testversion erkunden. Fordern Sie jetzt eine kostenlose Testversion an!

Wenn Sie eine große Anzahl von Kopien (z.B. 10 oder sogar 100 Kopien) eines einzelnen Arbeitsblatts erstellen müssen, kann die Verwendung der Standardfunktionen von Excel ziemlich umständlich werden. Stattdessen können Sie den Prozess mit einem einfachen VBA-Makro automatisieren. Dies ist besonders nützlich, um eine Arbeitsmappe mit voreingestellten Vorlagen zu generieren oder ein Formular für mehrere Dateneingaben, wie Umfragen oder Rechnungen, zu duplizieren.

1. Drücken Sie ALT + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Gehen Sie zu Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein:

VBA: Erstellen Sie mehrere Kopien eines bestimmten Arbeitsblatts in das aktive Arbeitsbuch

Sub Copier ()
Dim x As Integer
x = InputBox("Enter number of times to copy Sheet1")
For numtimes = 1 To x
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub

Hinweis: Ersetzen Sie bitte "Tabelle1" im Code durch den tatsächlichen Namen des Blatts, das Sie duplizieren möchten. Stellen Sie sicher, dass das Blatt in Ihrer Arbeitsmappe vorhanden ist, bevor Sie den Code ausführen, sonst erhalten Sie möglicherweise einen Fehler.

3Drücken Sie F5 , um den Code auszuführen. Sie werden aufgefordert, die Anzahl der Kopien einzugeben, die Sie für Ihr festgelegtes Arbeitsblatt erstellen möchten.

4. Nachdem Sie Ihre gewünschte Zahl eingegeben und bestätigt haben, wird das Makro schnell die angeforderten Kopien erstellen, jede mit einem eindeutigen Namen (z.B., “Tabelle1 (2)”, “Tabelle1 (3)” usw.).

Anwendbare Szenarien: Verwenden Sie diesen Ansatz, wenn Sie identische Blätter für Dateneingaben, Workflowvorlagen oder Prüfungsformulare massenhaft produzieren müssen.
Vorteile: Automatisiert repetitive Aufgaben, hochgradig anpassbar.
Nachteile: Erfordert Grundkenntnisse im Umgang mit dem VBA-Editor und eventuell muss die Makroberechtigung in Ihrer Arbeitsmappe aktiviert werden.
Fehlerbehebung und Tipps:

• Wenn Ihre Arbeitsmappe als .xlsx gespeichert ist, denken Sie daran, sie als .xlsm zu speichern, um Makros beizubehalten.
• Wenn Ihr Makro fehlschlägt, überprüfen Sie die Schreibweise des Blattnamens im Code und stellen Sie sicher, dass keine Namenskonflikte vorliegen.
• Wenn Ihre Makrosicherheit auf Hoch eingestellt ist, passen Sie die Einstellungen an, um makrofähige Arbeitsmappen auszuführen.

In Szenarien, in denen Sie Arbeitsblätter aus mehreren verschiedenen Arbeitsmappen zusammenführen müssen, zum Beispiel beim Sammeln von Eingaben von mehreren Teammitgliedern oder beim Zusammenführen von Monatsberichten, ist die Funktion „Arbeitsblätter kombinieren“ in Kutools für Excel besonders hilfreich. Mit wenigen Schritten können Sie bestimmte Blätter aus mehreren geschlossenen Dateien direkt in eine neue Arbeitsmappe extrahieren und kombinieren.

1Gehen Sie zu Kutools Plus > Kombinieren um den Assistenten zum Kombinieren von Arbeitsblättern zu aktivieren.

2In Schritt 1 des Assistenten wählen Sie die Option Mehrere Arbeitsblätter aus Arbeitsmappen in ein Arbeitsblatt kombinieren und klicken Sie auf Weiter.

3In Schritt 2 führen Sie die folgenden Schritte zur Auswahl von Arbeitsblättern über Arbeitsmappen hinweg aus:
(1) Klicken Sie auf Hinzufügen > Datei oder Ordner , um die Dateien auszuwählen, aus denen Sie Arbeitsblätter extrahieren möchten.
(2) In der Arbeitsmappenliste, aktivieren Sie die Dateien, die Sie interessieren.
(3) In der Arbeitsblattliste, aktivieren Sie das/die Arbeitsblatt(e), die Sie aus jeder Datei kopieren möchten.
(4) Wiederholen Sie dies für jedes Arbeitsbuch, das Sie einbeziehen möchten.
(5) Nachdem Sie Ihre Auswahl getroffen haben, klicken Sie auf Weiter.

4In Schritt 3 konfigurieren Sie zusätzliche Kopiereinstellungen entsprechend Ihren Bedürfnissen, wie Daten und Formatierung kombiniert werden sollen. Klicken Sie auf Fertig um den Vorgang abzuschließen.

5Geben Sie einen Zielordner und Dateinamen für die neue Arbeitsmappe im erscheinenden Dialogfeld an und klicken Sie auf Speichern.

Schließlich werden Sie möglicherweise gefragt, ob Sie die neue Arbeitsmappe öffnen und das Kombinationsszenario für die zukünftige Verwendung speichern möchten. Treffen Sie Ihre Auswahl nach Bedarf. Alle markierten Arbeitsblätter aus den ausgewählten Arbeitsmappen werden nun erfolgreich in eine einzige neue Datei zusammengeführt.

Das Hilfsprogramm „Arbeitsblätter kombinieren“ ist äußerst vielseitig:

• Kombinieren Sie schnell mehrere Arbeitsblätter oder Bereiche aus verschiedenen Dateien in ein Arbeitsblatt.
• Führen Sie alle gleichnamigen Arbeitsblätter aus mehreren Arbeitsmappen in einem zusammenfassenden Blatt zusammen.
• Konsolidieren oder zusammenführen Sie ganze Arbeitsmappen für eine einfache Verwaltung.
• Fassen Sie oder berechnen Sie Daten aus vielen Quellen an einem Ort zusammen.

Vorteile: Praktisch zum Zusammenführen von Daten von separaten Personen oder Projekten, spart Zeit bei routinemäßiger Berichterstattung.
Nachteile: Erfordert die Installation von Kutools für Excel.
Überprüfen Sie die zusammengeführten Daten auf doppelte oder fehlende Informationen, insbesondere nach dem Zusammenführen großer oder ähnlicher Arbeitsblätter.

Wenn Sie dieses Hilfsprogramm noch nicht ausprobiert haben, fordern Sie jetzt eine kostenlose Testversion an!

Obwohl Excel-Formeln keine vollständigen Arbeitsblätter duplizieren können, bietet eine semi-manuelle Alternative die Vorbereitung einer neuen Arbeitsblattvorlage und die Verwendung von Formeln, um Daten aus dem Original zu ziehen. Dieser Ansatz ist nützlich, wenn Sie nur Datenreplikation benötigen – wie zum Beispiel für Berichte oder das Vorbereiten von Vorlagen – und keine vollständige Duplikation von Diagrammen, Zellformatierungen oder Makros.

1. Erstellen Sie ein neues Arbeitsblatt und verwenden Sie dann Zellbezüge oder Formeln, um die gewünschten Daten zu replizieren. Geben Sie zum Beispiel in Zelle A1 Ihres neuen Blatts Folgendes ein:

=Sheet1!A1

2. Ziehen Sie den Ausfüllknauf, um diese Formel in den gewünschten Bereich zu kopieren. Dies verknüpft jede Zelle auf dem neuen Blatt mit ihrer Gegenpart auf dem Quellblatt.

3. Um zusätzliche Kopien zu erstellen, duplizieren Sie das neue Arbeitsblatt und aktualisieren Sie die Formeln oder Bezüge bei Bedarf (z.B. ändern Sie Bezüge auf ein anderes Quellblatt, falls erforderlich).

Anwendbare Szenarien: Gut für Berichtsvorlagen oder wenn nur Daten (nicht Formatierung oder Code) wiederholt werden müssen.
Vorteile: Keine zusätzlichen Tools erforderlich.
Nachteile: Manueller Aufwand erforderlich, wenn große Mengen benötigt werden; dupliziert keine erweiterte Formatierung, Formen oder VBA.

Tipps: Nach dem Formel-basierten Verlinken können Sie „Werte einfügen“ verwenden, um Formeln in Werte umzuwandeln, wenn Sie statische Daten statt verknüpfter Zellen wünschen.

Wenn Sie eine Liste von Blattnamen haben, die Sie häufig duplizieren müssen, können Sie VBA verwenden, um alle diese Blätter auf einmal mit minimalem manuellem Eingriff zu kopieren. Dies ist besonders nützlich für Vorlagen oder standardisierte Formulare, die monatlich, quartalsweise oder für Schulungsbatches verteilt werden.

1. Drücken Sie ALT + F11, um das Fenster Visual Basic for Applications zu öffnen.

2. Klicken Sie im VBA-Editor auf Einfügen > Modul und kopieren Sie den folgenden Code in das neue Modulfenster:

Sub CopyListSheets()
    Dim wsName As Variant
    Dim CopyCount As Integer
    Dim i As Integer
    Dim sheetExists As Boolean
    Dim ws As Worksheet
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    wsNames = Array("Sheet1", "Sheet2") 'Edit these names to your target sheets
    
    CopyCount = Application.InputBox("Enter the number of copies:", xTitleId, Type:=1)
    
    For Each wsName In wsNames
        sheetExists = False
        
        For Each ws In Worksheets
            If ws.Name = wsName Then
                sheetExists = True
                Exit For
            End If
        Next
        
        If sheetExists Then
            For i = 1 To CopyCount
                Worksheets(wsName).Copy After:=Sheets(Sheets.Count)
            Next i
        End If
    Next wsName
End Sub

3. Drücken Sie F5, um den Code auszuführen. Wenn Sie dazu aufgefordert werden, geben Sie die Anzahl der Kopien ein, die Sie für jedes Blatt möchten. Die angegebenen Blätter werden jeweils die angegebene Anzahl an Kopien am Ende Ihrer Arbeitsmappe hinzugefügt.

Hinweis: Passen Sie die Zeile wsNames = Array("Tabelle1", "Tabelle2") an, um die Namen aller Blätter einzubeziehen, die Sie duplizieren möchten. Diese Lösung ist ideal für die Batch-Verarbeitung von Standardformblättern.

Tipps & Fehlerhinweise:

• Wenn ein Blattname falsch geschrieben ist oder fehlt, wird dieses Blatt übersprungen.
• Stellen Sie sicher, dass Sie das Blattlimit von Excel nicht überschreiten (normalerweise bis zu 255 Blätter pro Arbeitsmappe, aber große Dateien können vorher langsamer werden).