Tauschen Sie schnell Inhalte zweier Zellen oder Bereiche in Excel
Das Vertauschen der Inhalte zweier Zellen oder Bereiche in Excel ist eine häufige Anforderung – sei es beim Neuorganisieren von Daten, Anpassen von Layouts oder Korrigieren von Eingabefehlern. In dieser Anleitung stellen wir Ihnen drei Methoden vor, mit denen Sie Inhalte in Excel schnell und effizient tauschen können, ohne umständlich ausschneiden und einfügen zu müssen. So sparen Sie Zeit und minimieren das Risiko von Fehlern.
Manuelles Tauschen zweier benachbarter Zellinhalte
Einfaches Tauschen der Inhalte zweier Zellen oder Bereiche mit nur wenigen Klicks
Tauschen zweier Zellinhalte mithilfe von VBA-Code
Manuelles Tauschen zweier benachbarter Zellinhalte
Gelegentlich möchten Sie vielleicht zwei benachbarte Zellen miteinander tauschen – und das geht ganz einfach manuell. So tauschen Sie die Zellen A4 und B4, wie in den Screenshots dargestellt:
- Wählen Sie eine der Zellen zum Tauschen aus – beispielsweise die Zelle A4.
- Halten Sie die Umschalttaste gedrückt und positionieren Sie den Mauszeiger am rechten Rand der ausgewählten Zelle.
- Ziehen Sie den Mauszeiger vorsichtig bis an den rechten Rand der Zelle B4.
- Sobald der Mauszeiger das Symbol „工“ anzeigt, lassen Sie die Maustaste los.
Die Inhalte der beiden Zellen sollten nun wie im folgenden Screenshot gezeigt vertauscht sein.
Einfaches Tauschen der Inhalte zweier Zellen oder Bereiche mit nur wenigen Klicks
Für Benutzer, die nicht benachbarte Zellen oder Bereiche tauschen möchten, vereinfacht ein Excel-Add-In wie Kutools für Excel den Vorgang erheblich.
Nach der Installation von Kutools für Excel wählen Sie Kutools > Bereich > Bereiche tauschen, um das Dialogfeld Bereiche tauschen zu öffnen, und konfigurieren Sie es anschließend wie folgt.
- Wählen Sie im Abschnitt Zu tauschender Bereich 1 die erste Zelle oder den ersten Bereich aus, den Sie tauschen möchten.
- Wählen Sie im Abschnitt Zu tauschender Bereich 2 die zweite Zelle oder den zweiten Bereich aus, mit dem Sie tauschen möchten.Tipp: Wählen Sie zur einfacheren Handhabung die beiden Bereiche bereits vor dem Öffnen des Dialogfelds „Bereiche tauschen“ aus. Die zuvor markierten Bereiche werden dann automatisch in die Felder „Zu tauschender Bereich 1“ und „Zu tauschender Bereich 2“ eingetragen.
- Klicken Sie auf die Schaltfläche OK.
Ergebnis
Anschließend werden die beiden ausgewählten Zellen oder Bereiche sofort miteinander getauscht. Siehe Screenshots:
Wenn Sie eine kostenlose 30-Tage-Testversion dieses Dienstprogramms nutzen möchten, klicken Sie bitte hier, um sie herunterzuladen, und führen Sie anschließend die Aktion gemäß den oben beschriebenen Schritten aus.
Tauschen zweier nicht benachbarter Zellinhalte mithilfe von VBA-Code
Wenn die beiden Zellen nicht benachbart sind, funktioniert die oben beschriebene Methode nicht. In diesem Fall können Sie sie mithilfe von VBA-Code einfach austauschen.
1. Halten Sie die Strg-Taste gedrückt und wählen Sie die beiden nicht benachbarten Zellen aus, deren Inhalte Sie tauschen möchten.
2. Klicken Sie auf Entwickler > Visual Basic. Daraufhin öffnet sich ein neues Fenster für Microsoft Visual Basic für Applikationen. Klicken Sie auf Einfügen > Modul, und geben Sie den folgenden Code in das Modul ein:
Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub3. Klicken Sie anschließend auf die Schaltfläche 
, um den Code auszuführen. Danach erscheint ein Dialogfeld, in dem Sie die beiden zu tauschenden Zellen auswählen können. Siehe Screenshots:
4. Klicken Sie im eingeblendeten Dialogfeld auf OK, um die beiden ausgewählten Zellen zu tauschen. Siehe Screenshots:
Hinweis: Dieser VBA-Code kann die Formatierung der beiden Zellen nicht tauschen.
Demo: Tauschen zweier beliebiger Zellinhalte mit Kutools für Excel
Verwandter Artikel:
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 zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins