Wie tauscht oder vertauscht man Text innerhalb einer Zelle in Excel?
In vielen Fällen müssen Sie möglicherweise Text innerhalb einer einzelnen Zelle aus bestimmten Gründen vertauschen. Beispielsweise enthält eine Zelle den Namen „Smith John“, und Sie möchten den Text innerhalb der Zelle so tauschen, dass der Name zu „John Smith“ wird. Dieser Artikel listet einige Methoden auf, um dieses Problem zu lösen.
Text innerhalb einer Zelle mithilfe einer Formel tauschen oder vertauschen
Text innerhalb einer Zelle mithilfe von VBA-Code tauschen oder vertauschen
Text innerhalb einer Zelle mühelos mit Kutools für Excel tauschen oder vertauschen>
Text innerhalb einer Zelle mithilfe einer Formel tauschen oder vertauschen
Die folgende Formel hilft Ihnen, Text innerhalb einer Zelle in Excel zu tauschen. Gehen Sie dazu wie folgt vor:
1. Wählen Sie eine leere Zelle aus, um die getauschten Daten einzufügen, geben Sie die Formel in die Formelleiste ein und drücken Sie anschließend die EingabetasteSiehe Screenshot:
=RIGHT(A2,LEN(A2)-FIND(" ",A2)) & „ " & LEFT(A2,FIND(„ ",A2)-1)
2. Wählen Sie die Ergebniszelle aus und ziehen Sie dann den Ausfüllkästchen nach unten, um die übrigen Ergebnisse wie im folgenden Screenshot gezeigt zu erhalten.
Anschließend sehen Sie, dass Vorname und Nachname in den angegebenen Zellen getauscht wurden.
Hinweis: Mit dieser Methode können Sie nur zwei durch ein Leerzeichen getrennte Texte innerhalb einer Zelle vertauschen.
Tauschen oder vertauschen Sie Text innerhalb einer Zelle in Excel mühelos:
Mit dem Text umkehren-Tool von Kutools für Excel tauschen Sie Text innerhalb einer Zelle anhand eines bestimmten Trennzeichens mühelos – genau wie in der folgenden Demo gezeigt.
Laden Sie es jetzt herunter und testen Sie es! (30-tägige kostenlose Testversion)
Text innerhalb einer Zelle mithilfe von VBA-Code tauschen oder vertauschen
Wie im obigen Beispiel gezeigt, können Sie auch das folgende VBA-Skript ausführen, um Text innerhalb einer Zelle zu tauschen oder zu vertauschen.
1. Drücken Sie gleichzeitig die Tasten Alt+F11, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic für Applikationen auf Einfügen > Modul. Kopieren Sie anschließend den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein.
VBA-Code: Text innerhalb einer Zelle tauschen oder vertauschen
Sub res()
Dim xRg As Range, yRg As Range
Dim LastRow As Long, i As Long
Dim strTxt As String, strFs As String
Dim strLs As String, N As Integer
On Error Resume Next
Set xRg = Application.InputBox(Prompt:="Range Selection:", _
Title:="Kutools for excel", Type:=8)
For Each yRg In xRg
On Error Resume Next
strTxt = yRg.Value
Trim (strTxt)
N = InStr(strTxt, " ")
strLs = Left(strTxt, N - 1)
strFs = Right(strTxt, Len(strTxt) - N)
yRg.Value = strFs & " " & strLs
Next
End Sub3. Drücken Sie die Taste F5, um den Code auszuführen. Wählen Sie im erscheinenden Dialogfeld Kutools für Excel den Bereich mit den Daten aus, die Sie tauschen möchten, und klicken Sie anschließend auf die Schaltfläche OK. Siehe Screenshot:
Anschließend sehen Sie, dass die Texte in den angegebenen Namenszellen sofort getauscht wurden.
Hinweis: Dieser Code tauscht auch zwei Wörter innerhalb einer Zelle korrekt, sofern sie durch ein Leerzeichen getrennt sind.
Text innerhalb einer Zelle mühelos mit Kutools für Excel tauschen oder vertauschen
Dieser Abschnitt empfiehlt das Text umkehren-Tool von Kutools für Excel, um Ihnen bei der einfachen Lösung dieses Problems zu helfen. Gehen Sie dazu wie folgt vor.
1. Wählen Sie den Bereich aus, der die zu tauschenden Texte enthält, und klicken Sie anschließend auf Kutools > Text > Text umkehren. Siehe Screenshot:
2. Wählen Sie im Dialogfeld Text umkehren im Abschnitt Trennzeichen das Trennzeichen aus, anhand dessen Sie die Textteile tauschen möchten. In diesem Fall wähle ich die Option Leerzeichen. Klicken Sie anschließend auf die Schaltfläche OK.
Anschließend sehen Sie, dass die Daten in den ausgewählten Zellen sofort innerhalb derselben Zelle anhand des angegebenen Trennzeichens getauscht wurden.
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.
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