Jak zmienić układ tekstu w komórce w programie Excel?

Przypuśćmy, że masz arkusz kalkulacyjny z długimi listami nazw, które mają format „Nazwisko Imię”, a teraz musisz zmienić kolejność wszystkich nazw na „Imię, Nazwisko”. Jak to osiągnąć? W tym artykule przedstawimy trzy metody, które pomogą Ci rozwiązać problem.

Zmień kolejność tekstu w komórce za pomocą formuły
Zmień kolejność tekstu w komórce za pomocą kodu VBA
Szybko przestawiaj tekst w komórce za pomocą Kutools for Excel

Zmień kolejność tekstu w komórce za pomocą formuły

Poniższa formuła może pomóc w odwróceniu nazwiska i imienia w komórce w programie Excel. Wykonaj następujące czynności.

1. Wybierz pustą komórkę, aby wyprowadzić zmieniony tekst, wprowadź do niej poniższą formułę, a następnie naciśnij klawisz Enter.

= TRIM (ŚRODEK (b2, SZUKAJ ("", b2) +1,250 2)) & "" & LEWO (b2, SZUKAJ ("", b1) -XNUMX)

Note: we wzorze B2 to komórka zawierająca nazwę, którą zmienisz. Zmień to w zależności od potrzeb.

2. Kontynuuj wybieranie komórki wynikowej, przeciągnij uchwyt wypełnienia w dół, aby odwrócić wszystkie nazwy, jak pokazano poniżej.

Zmień kolejność tekstu w komórce za pomocą kodu VBA

Poza tym możesz zastosować poniższy kod VBA, aby odwrócić wszystkie nazwy na liście jednocześnie w Excelu. Wykonaj następujące czynności.

1. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj poniższy kod VAB do okna modułu.

Kod VBA: Zmień kolejność tekstu w komórce

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. Następnie a Kutools dla programu Excel pojawi się okno dialogowe, wybierz listę nazw, którą chcesz zmienić, a następnie kliknij OK przycisk. Zobacz zrzut ekranu:

Następnie wszystkie „Nazwisko Imię” na wybranej liście zostaną natychmiast odwrócone.

Szybko przestawiaj tekst w komórce za pomocą Kutools for Excel

Ta sekcja wprowadzi Odwróć kolejność tekstu użyteczność Kutools dla programu Excel aby pomóc Ci zmienić układ tekstu w komórce.

1. Wybierz listę imion, na której odwrócisz „Nazwisko Imię”, a następnie kliknij Kutools > Tekst > Odwróć kolejność tekstu. Zobacz zrzut ekranu:

2. w Odwróć tekst w oknie dialogowym wybierz opcję Typ przestrzeni opcję, a następnie kliknij przycisk OK przycisk. Zobacz zrzut ekranu:

Następnie wszystkie nazwy na wybranej liście zostaną od razu przestawione.

Podobne artykuły:

• Jak zamienić lub odwrócić dzień i miesiąc w programie Excel?
• Jak zamienić lub zamienić tekst w jednej komórce w programie Excel?

Najlepsze narzędzia biurowe

🤖	Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
	Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
	Super wyszukiwanie: Wiele kryteriów VLookup  |   Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
	Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
	Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
	Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły   |  Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki   |  Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
	15 najlepszych zestawów narzędzi:  12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Czytaj więcej... Darmowe pobieranie...

---

Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

• Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
• Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
• Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!

Czytaj więcej... Darmowe pobieranie...