Angenommen, Sie haben eine Tabelle mit langen Listennamen, die alle als "Nachname Vorname" formatiert sind, und jetzt müssen Sie alle Namen in "Vorname, Nachname" umordnen. Wie erreicht man das? In diesem Artikel werden drei Methoden vorgestellt, mit denen Sie das Problem lösen können.
Ordnen Sie Text in einer Zelle mit Formel neu an
Ordnen Sie Text in einer Zelle mit VBA-Code neu an
Ordnen Sie Text in einer Zelle mit Kutools for Excel schnell neu an
Die folgende Formel kann Ihnen helfen, Nachname und Vorname in einer Zelle in Excel umzudrehen. Bitte gehen Sie wie folgt vor.
1. Wählen Sie eine leere Zelle aus, um den neu angeordneten Text auszugeben, geben Sie die folgende Formel ein und drücken Sie die Eingabetaste.
= TRIM (MITTE (b2, SUCHE ("", b2) +1,250)) & "" & LINKS (b2, SUCHE ("", b2) -1)
Hinweis: In der Formel ist B2 die Zelle, die den Namen enthält, den Sie neu anordnen werden. Bitte ändern Sie es nach Ihren Wünschen.
2. Wählen Sie die Ergebniszelle weiter aus und ziehen Sie den Füllgriff nach unten, um alle Namen wie im folgenden Screenshot zu spiegeln.
Ordnen Sie Text in einer Zelle in Excel einfach neu an:
Das Reverse Text Nutzen von Kutools for Excel kann Ihnen helfen, Text innerhalb einer Zelle durch ein bestimmtes Trennzeichen in Excel einfach auszutauschen. Siehe folgenden Screenshot:
Herunterladen und ausprobieren! (30 Tage kostenloser Trail)
Außerdem können Sie den folgenden VBA-Code anwenden, um alle Namen in einer Liste gleichzeitig in Excel umzudrehen. Bitte gehen Sie wie folgt vor.
1. Drücken Sie die Taste Andere + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden VAB-Code in das Modulfenster.
VBA-Code: Ordnen Sie den Text in einer Zelle neu an
Sub RearrangeText() 'Updated by Extendoffice 20180503 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 Sub
3. Dann a Kutools for Excel Das Dialogfeld wird angezeigt. Wählen Sie die Namensliste aus, die Sie neu anordnen möchten, und klicken Sie dann auf OK Taste. Siehe Screenshot:
Dann werden alle "Nachname Vorname" in der ausgewählten Liste sofort umgedreht.
In diesem Abschnitt wird das vorgestellt Textreihenfolge umkehren Nutzen von Kutools for Excel um Ihnen zu helfen, Text in einer Zelle neu anzuordnen.
Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.
1. Wählen Sie die Namensliste aus, in der Sie den „Nachnamen Vorname“ umdrehen möchten, und klicken Sie dann auf Kutools > Text > Textreihenfolge umkehren. Siehe Screenshot:
2. In dem Reverse Text Wählen Sie im Dialogfeld Raumfahrt Option und klicken Sie dann auf OK Taste. Siehe Screenshot:
Dann werden alle Namen in der ausgewählten Liste gleichzeitig neu angeordnet.
Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.
