Wie kopiere ich mehrere Auswahlen oder Bereiche in Excel?
Sie haben beispielsweise ein großes Arbeitsblatt und möchten jetzt nur einige ausgewählte Bereiche kopieren und auf andere Arbeitsblätter verteilen. Wenn Sie jedoch mehrere Bereiche auswählen und auf Kopieren klicken, wird ein Dialogfeld angezeigt, in dem Sie daran erinnert werden, dass dieser Befehl nicht für mehrere Bereiche verwendet werden kann. Wie kopieren Sie in diesem Zustand schnell mehrere ausgewählte Bereiche? Hier sind einige Tricks, mit denen Sie diese Aufgabe lösen können.
- Kopieren Sie mehrere ausgewählte Bereiche mit der Zwischenablage
- Kopieren Sie mehrere ausgewählte Bereiche mit VBA-Code
- Kopieren Sie mehrere ausgewählte Bereiche aus einem Arbeitsblatt
- Kopieren Sie mehrere Bereiche aus vielen Arbeitsblättern / Arbeitsmappen
Kopieren Sie mehrere ausgewählte Bereiche mit der Zwischenablage
Mit Hilfe von Zwischenablagekönnen Sie alle ausgewählten Bereiche gleichzeitig in einen anderen Bereich oder ein anderes Arbeitsblatt einfügen. Bitte gehen Sie wie folgt vor:
1. Klicken Sie Start > der Zwischenablage Gruppe, um die anzuzeigen Zwischenablage Brot.. Siehe Screenshot:
2. Kopieren Sie dann die ausgewählten Bereiche, die Sie benötigen, nacheinander. Gleichzeitig wurden die kopierten Bereiche in der angezeigt Zwischenablage Brot. siehe Screenshot oben:
3. Wählen Sie die erste Zelle des Zielbereichs aus, in den Sie alle kopierten Bereiche einfügen möchten, und klicken Sie auf Alle einfügen Knopf im Zwischenablage Feld.
Anschließend wurden alle kopierten Bereiche in den angegebenen Zielbereich eingefügt.
Kombinieren Sie einfach mehrere Auswahlen aus vielen Arbeitsblättern / Arbeitsmappen zu einem einzigen Arbeitsblatt / Arbeitsmappe
Es kann mühsam sein, Dutzende von Blättern aus verschiedenen Arbeitsmappen zu einem Blatt zu kombinieren. Aber mit Kutools für Excel Kombinieren (Arbeitsblätter und Arbeitsmappen) Dienstprogramm, können Sie es mit nur wenigen Klicks erledigen!

Kutools for Excel - Enthält mehr als 300 praktische Tools für Excel. Kostenlose Testversion mit vollem Funktionsumfang 30-Tag, keine Kreditkarte erforderlich! Hol es dir jetzt
Kopieren Sie mehrere ausgewählte Bereiche mit VBA-Code
Mit VBA-Code können Sie auch mehrere ausgewählte Bereiche kopieren und in ein anderes Arbeitsblatt einfügen.
1. Halten der Ctrl Geben Sie mehrere nicht benachbarte Bereiche ein und wählen Sie sie aus, die Sie verwenden möchten.
2. Drücken Sie Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Anwendungen Klicken Sie im Fenster Insert > Modulund geben Sie den folgenden Code in das Modul ein:
Option Explicit Sub CopyMultipleSelection () Dim SelAreas () As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim TopRow As Long, LeftCol As Integer Dim RowOffset As Long, ColOffset As Integer Dim NonEmptyCellCount As Integer 'Exit Wenn kein Bereich ausgewählt ist Wenn TypeName (Auswahl) <> "Bereich", dann MsgBox "Wählen Sie den zu kopierenden Bereich aus. Eine Mehrfachauswahl ist zulässig." Unterende beenden Wenn 'Bereiche als separate Bereichsobjekte speichern NumAreas = Selection.Areas.Count ReDim SelAreas (1 bis NumAreas) Für i = 1 bis NumAreas Set SelAreas (i) = Selection.Areas (i) Next' Bestimmen Sie oben links Zelle in der Mehrfachauswahl TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count For i = 1 To NumAreas If SelAreas (i) .Row <TopRow Then TopRow = SelAreas (i) .Row If SelAreas (i) .Column <LeftCol Then LeftCol = SelAreas (i) .Column Next Set UpperLeft = Cells (TopRow, LeftCol) 'Paste-Adresse bei Fehler abrufen Resume Next Set PasteRange = Application.InputBox _ (Prompt: = "Geben Sie die obere linke Zelle für das Einfügen an Bereich: ", _ Titel: =" Mehrfachauswahl kopieren ", _ Typ: = 8) Bei Fehler Gehe zu 0 'Beenden, wenn abgebrochen Wenn Typname (PasteRange) <>" Bereich ", dann Sub beenden' Stellen Sie sicher, dass nur die obere linke Zelle vorhanden ist used Set PasteRange = PasteRange.Range ("A1") 'Einfügebereich auf vorhandene Daten prüfen NonEmptyCellCount = 0 For i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Bereiche (i) .Column - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Bereich (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i) .Rows.Count - 1, _ ColOffset + (i) .Columns.Count - 1))) Weiter i 'Wenn der Einfügebereich nicht leer ist, warnen Sie den Benutzer. Wenn NonEmptyCellCount <> 0 Dann _ Wenn MsgBox ("Vorhandene Daten überschreiben?", vbQuestion + vbYesNo, _ "Mehrfachauswahl kopieren ") <> vbYes Beenden Sie dann Sub 'Kopieren Sie jeden Bereich und fügen Sie ihn ein. For i = 1 To NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i) .Column - LeftCol SelAreas (i) .Copy PasteRange.Offset ( RowOffset, ColOffset) Weiter i End Sub
3. Klicken Sie dann auf Run Schaltfläche, um den Code auszuführen.
4. Und jetzt geben Sie bitte eine Zelle an, um die Bereiche in die Öffnung einzufügen Mehrfachauswahl kopieren Klicken Sie auf das Dialogfeld OK Taste. Siehe Screenshot:
Kopieren Sie schnell mehrere ausgewählte Bereiche aus einem Arbeitsblatt
Das Mehrere Bereiche kopieren Nutzen von Kutools for Excel kann Ihnen helfen, schnell mehrere Bereiche aus dem aktiven Arbeitsblatt zu kopieren. Bitte gehen Sie wie folgt vor:
Kutools for Excel - Enthält mehr als 300 praktische Tools für Excel. Kostenlose Testversion mit vollem Funktionsumfang 30-Tag, keine Kreditkarte erforderlich! Hol es dir jetzt
1. Wählen Sie die Bereiche, die Sie verwenden möchten, einzeln aus, ohne die Taste gedrückt zu halten Ctrl Taste und klicken Sie dann auf Kutoolen > Bereiche kopieren. Siehe Screenshot:
2. In dem Mehrere Bereiche kopieren Dialogfeld überprüfen Alles Option von Inhalte einfügen Abschnitt und klicken Sie auf Okay button. Siehe Screenshot oben:
Hinweis: Wenn Sie die Zeilenhöhe und Spaltenbreite als ursprüngliche Bereiche beibehalten möchten, überprüfen Sie dies bitte Einschließlich Reihenhöhe Option und Einschließlich Spaltenbreite Option im Dialogfeld Mehrere Bereiche kopieren.
3. Geben Sie im folgenden Eingabeaufforderungsfeld eine Zelle zum Einfügen der Bereiche an und klicken Sie auf OK .
Und jetzt werden alle ausgewählten Bereiche mit der gleichen Zeilenhöhe und Spaltenbreite wie die ursprüngliche Auswahl in die angegebene Zelle eingefügt.
Kutools for Excel - Enthält mehr als 300 praktische Tools für Excel. Kostenlose Testversion mit vollem Funktionsumfang 30-Tag, keine Kreditkarte erforderlich! Hol es dir jetzt
Kopieren Sie mehrere Bereiche aus vielen Arbeitsblättern / Arbeitsmappen
Kutools für Excel bietet eine weitere Arbeitsblätter kombinieren Dienstprogramm zum einfachen Kopieren mehrerer Bereiche aus vielen Arbeitsblättern oder Arbeitsmappen in Excel. Bitte gehen Sie wie folgt vor:
Kutools for Excel - Enthält mehr als 300 praktische Tools für Excel. Kostenlose Testversion mit vollem Funktionsumfang 30-Tag, keine Kreditkarte erforderlich! Hol es dir jetzt
1 Klicken Kutoolen Plus > Kombinieren.
2. Aktivieren Sie im sich öffnenden Dialogfeld Arbeitsblätter kombinieren - Schritt 1 von 3 das Kontrollkästchen Kombinieren Sie mehrere Arbeitsblätter aus der Arbeitsmappe zu einem Arbeitsblatt Option und klicken Sie auf Weiter .
3. Gehen Sie im Dialogfeld Arbeitsblätter kombinieren - Schritt 2 von 3 wie folgt vor:
(1) Wählen Sie die Arbeitsmappe in der Arbeitsmappenliste Klicken Sie dann auf Entdecken Schaltfläche hinter jedem Arbeitsblatt, um den Bereich von jedem Arbeitsblatt anzugeben;
(2) Klicken Sie auf Verwenden Sie Klicken Sie auf die Schaltfläche, um weitere Arbeitsmappen hinzuzufügen, aus denen Sie Bereiche kopieren möchten, und wiederholen Sie den Vorgang oben (1), um Bereiche in der hinzugefügten Arbeitsmappe anzugeben.
(3) Klicken Sie auf Endziel .
Kutools for Excel - Enthält mehr als 300 praktische Tools für Excel. Kostenlose Testversion mit vollem Funktionsumfang 30-Tag, keine Kreditkarte erforderlich! Hol es dir jetzt
4. Dann erscheint ein Dialogfeld von Kutools for Excel und fordert Sie auf, das Kombinationsszenario zu speichern. Bitte klicken Sie auf Ja Knopf oder Nein Taste nach Bedarf.
Bisher wurden alle angegebenen Bereiche aus mehreren Arbeitsblättern oder Arbeitsmappen kopiert und in eine neue Arbeitsmappe eingefügt.
Demo: Kopieren Sie mehrere ausgewählte Bereiche aus einem Arbeitsblatt
Demo: Kopieren Sie mehrere ausgewählte Bereiche aus vielen Arbeitsmappen / Arbeitsblättern
Die besten Tools für die Office-Produktivität
Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%
- Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
- Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
- Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
- Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
- Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
- Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
- Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
- Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
- Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.

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!














