Jennifer muss häufig Kopien von Arbeitsblättern erstellen, sobald sie das erste Arbeitsblatt einer Arbeitsmappe eingerichtet hat, und es ist normalerweise eine gute Anzahl von Kopien. Zum Beispiel ist es nicht ungewöhnlich, dass sie 20 Kopien eines bestimmten Arbeitsblatts erstellen muss. Sie fragt sich, ob es eine Möglichkeit gibt, einfach mehrere Kopien zu erstellen. Das Klicken mit der rechten Maustaste und das Verwenden der Verschiebungs- / Kopierfunktion wird nach einer Weile ziemlich mühsam.

Es gibt eine Möglichkeit, die Option zum Verschieben / Kopieren etwas effizienter zu nutzen. Angenommen, Sie möchten 20 Arbeitsblätter aus Ihrem Original erstellen. Sie können die folgenden Schritte ausführen:

  1. Stellen Sie sicher, dass Ihr einzelnes Arbeitsblatt ausgewählt ist.

  2. Klicken Sie mit der rechten Maustaste auf die Registerkarte Arbeitsblatt. Excel zeigt ein Kontextmenü an.

  3. Wählen Sie im Kontextmenü die Option Verschieben oder Kopieren. Excel zeigt das Dialogfeld Verschieben oder Kopieren an.

  4. Wählen Sie die Option (zum Ende verschieben).

  5. Stellen Sie sicher, dass das Kontrollkästchen Kopie erstellen aktiviert ist.

  6. Klicken Sie auf OK. Sie haben jetzt zwei Kopien Ihres Arbeitsblatts (das Original und die gerade erstellte Kopie).

  7. Wählen Sie beide Arbeitsblätter aus, indem Sie auf die erste Registerkarte des Arbeitsblatts klicken und die Umschalttaste gedrückt halten, während Sie auf die letzte Registerkarte des Arbeitsblatts klicken.

  8. Klicken Sie mit der rechten Maustaste auf die ausgewählten Arbeitsblattregisterkarten. Excel zeigt ein Kontextmenü an.

  9. Wählen Sie im Kontextmenü die Option Verschieben oder Kopieren. Excel zeigt das Dialogfeld Verschieben oder Kopieren an.

  10. Wählen Sie die Option (zum Ende verschieben).

  11. Stellen Sie sicher, dass das Kontrollkästchen Kopie erstellen aktiviert ist.

  12. Klicken Sie auf OK. Sie haben jetzt vier Kopien Ihres Arbeitsblatts.

  13. Wählen Sie alle Arbeitsblätter aus, indem Sie auf die erste Arbeitsblattregisterkarte klicken und die Umschalttaste gedrückt halten, während Sie auf die letzte Arbeitsblattregisterkarte klicken.

  14. Klicken Sie mit der rechten Maustaste auf die ausgewählten Arbeitsblattregisterkarten. Excel zeigt ein Kontextmenü an.

  15. Wählen Sie im Kontextmenü die Option Verschieben oder Kopieren. Excel zeigt das Dialogfeld Verschieben oder Kopieren an.

  16. Wählen Sie die Option (zum Ende verschieben).

  17. Stellen Sie sicher, dass das Kontrollkästchen Kopie erstellen aktiviert ist.

  18. Klicken Sie auf OK. Sie haben jetzt acht Kopien Ihres Arbeitsblatts.

  19. Wählen Sie alle Arbeitsblätter aus, indem Sie auf die erste Arbeitsblattregisterkarte klicken und die Umschalttaste gedrückt halten, während Sie auf die letzte Arbeitsblattregisterkarte klicken.

  20. Klicken Sie mit der rechten Maustaste auf die ausgewählten Arbeitsblattregisterkarten. Excel zeigt ein Kontextmenü an.

  21. Wählen Sie im Kontextmenü die Option Verschieben oder Kopieren. Excel zeigt das Dialogfeld Verschieben oder Kopieren an.

  22. Wählen Sie die Option (zum Ende verschieben).

  23. Stellen Sie sicher, dass das Kontrollkästchen Kopie erstellen aktiviert ist.

  24. Klicken Sie auf OK. Sie haben jetzt 16 Kopien Ihres Arbeitsblatts.

  25. Wählen Sie vier Ihrer Arbeitsblätter aus, indem Sie auf die erste Registerkarte des Arbeitsblatts klicken und die Umschalttaste gedrückt halten, während Sie auf die vierte Registerkarte des Arbeitsblatts klicken.

  26. Klicken Sie mit der rechten Maustaste auf die ausgewählten Arbeitsblattregisterkarten. Excel zeigt ein Kontextmenü an.

  27. Wählen Sie im Kontextmenü die Option Verschieben oder Kopieren. Excel zeigt das Dialogfeld Verschieben oder Kopieren an.

  28. Wählen Sie die Option (zum Ende verschieben).

  29. Stellen Sie sicher, dass das Kontrollkästchen Kopie erstellen aktiviert ist.

  30. Klicken Sie auf OK. Sie haben jetzt 20 Kopien Ihres Arbeitsblatts.

Das mag wie eine Menge Schritte erscheinen, ist es aber nicht wirklich – alles, was Sie getan haben, ist, die Verschiebungs- / Kopierfunktion fünf statt 20 Mal zu verwenden, um zur gewünschten Anzahl von Arbeitsblättern zu gelangen. Dieser Ansatz hat jedoch eine Einschränkung: Wenn das Arbeitsblatt, das Sie kopieren, definierte Tabellen enthält, können Sie Schritt 8 nicht überwinden. Wenn Sie Schritt 9 versuchen, wird eine Meldung angezeigt, die dies besagt Sie können eine Gruppe von Arbeitsblättern nicht kopieren oder verschieben, wenn eines davon Tabellen enthält. (Sie können ein einzelnes Arbeitsblatt mit einer Tabelle kopieren oder verschieben, nur keine Gruppe davon.)

Es gibt eine weitere Verknüpfung, die Sie verwenden können, ohne das Dialogfeld Verschieben oder Kopieren zu verwenden. Sie müssen lediglich das Arbeitsblatt auswählen, das Sie kopieren möchten, und den Arbeitsblattnamen (auf der Registerkarte Arbeitsblatt) nach rechts ziehen. Neben dem Mauszeiger wird ein kleines „Dokument“ -Symbol angezeigt. Drücken Sie an dieser Stelle die Strg-Taste. Innerhalb des Symbols wird ein Pluszeichen angezeigt. Wenn Sie die Maustaste loslassen, wird das Arbeitsblatt kopiert. Sie können auf diese Weise auch Gruppen von Arbeitsblättern kopieren, es sei denn, die Arbeitsblätter in der Gruppe enthalten wieder definierte Tabellen.

Eine weitere Möglichkeit zum Kopieren Ihres Arbeitsblatts besteht darin, Folgendes zu tun:

  1. Erstellen Sie nach Bedarf Ihr „Master“ -Arbeitsblatt.

  2. Fügen Sie genügend leere Arbeitsblätter hinzu, damit Sie für jede Kopie, die Sie erstellen möchten, eines haben. (Eine gute Möglichkeit, leere Arbeitsblätter hinzuzufügen, besteht darin, Umschalt + F11 zu drücken.)

  3. Wählen Sie das Master-Arbeitsblatt aus.

  4. Drücken Sie Strg + A. Excel wählt alles im Master-Arbeitsblatt aus.

  5. Drücken Sie Strg + C. Alles wird jetzt in die Zwischenablage kopiert.

  6. Klicken Sie auf die Registerkarte Arbeitsblatt für das erste leere Arbeitsblatt, das Sie erstellt haben.

  7. Halten Sie die Umschalttaste gedrückt, während Sie auf die Registerkarte Arbeitsblatt für das zuletzt leere Arbeitsblatt klicken, das Sie erstellt haben.

  8. Drücken Sie Strg + V. Der Inhalt der Zwischenablage wird in jedes der von Ihnen ausgewählten Arbeitsblätter eingefügt.

Dadurch wird alles aus dem Master-Arbeitsblatt kopiert, einige Dinge wie Spaltenbreiten, Zeilenhöhen oder Drucklayouteinstellungen werden jedoch nicht kopiert.

Sie können einige zusätzliche Schritte ausführen, um einige davon zu kopieren, es ist jedoch schwierig, alle zu kopieren.

Aus Gründen der Geschwindigkeit und Bequemlichkeit ist die Verwendung eines Makros zum Erstellen der Kopien (meiner Ansicht nach) am einfachsten. Hier ist ein sehr einfaches Makro, mit dem Kopien des ausgewählten Arbeitsblatts erstellt werden, bis die Arbeitsmappe insgesamt 20 Arbeitsblätter enthält:

Sub SimpleCopy1()

Do While Sheets.Count < 20         ActiveSheet.Copy After:=Sheets(Sheets.Count)

Loop End Sub

Wenn Ihre Arbeitsmappe bereits zusätzliche Arbeitsblätter enthält (außer dem, das Sie kopieren möchten), können Sie diese Version verwenden:

Sub SimpleCopy2()

Dim J As Integer

For J = 1 To 20         ActiveSheet.Copy After:=Sheets(Sheets.Count)

Next J End Sub

Sie können Ihr Makro etwas allgemeiner gestalten, indem Sie den Benutzer fragen, wie viele Kopien erstellt werden sollen:

Sub SimpleCopy2()

Dim J As Integer     Dim iWanted As Integer

On Error GoTo Done     iWanted = Cint(InputBox("Number of copies?"))



If iWanted >0 And iWanted < 201 Then         For J = 1 To iWanted             ActiveSheet.Copy After:=Sheets(Sheets.Count)

Next J     End If Done:

On Error GoTo 0 End Sub

Dieses Makro begrenzt auch die Anzahl der erstellten Arbeitsblattkopien auf 1 bis 200. (Außerhalb dieses Bereichs wird nichts unternommen.) Die Fehlerbehandlung wird hinzugefügt, falls Ihre Arbeitsmappe bereits eine große Anzahl von Arbeitsblättern enthält und das Hinzufügen zusätzlicher Arbeitsblätter die überschreitet Anzahl der Arbeitsblätter, die in einer Arbeitsmappe enthalten sein dürfen.

Unabhängig davon, für welchen Makroansatz Sie sich entscheiden, empfiehlt es sich, ihn Ihrer Symbolleiste für den Schnellzugriff hinzuzufügen oder ihm eine Tastenkombination zuzuweisen. Auf diese Weise können Sie Ihre Arbeitsblätter sehr schnell kopieren.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (1600) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365.