Przejdź do głównej zawartości

Jak odwrócić ciąg tekstowy lub kolejność słów w programie Excel?

Kiedy korzystasz z arkusza programu Excel, jak odwrócić ciąg tekstowy lub kolejność słów w programie Excel? Na przykład chcesz odwrócić „Excel to dla nas przydatne narzędzie"Do"su rof łup lufesu a si lecxE”. Czasami możesz też odwrócić kolejność słów, na przykład „Excela, Worda, PowerPointa, OneNote"Do"OneNote, PowerPoint, Word, Excel”. Zwykle jest to dość trudne do rozwiązania tego problemu. Proszę spojrzeć na następujące metody:

Odwróć ciąg tekstowy z funkcją zdefiniowaną przez użytkownika

Odwróć kolejność słów oddzielonych specjalnym separatorem z kodem VBA

Odwróć ciąg tekstowy lub kolejność słów za pomocą Kutools for Excel szybko i łatwo


strzałka niebieski prawy bąbelek Odwróć ciąg tekstowy z funkcją zdefiniowaną przez użytkownika

Przypuśćmy, że masz zakres ciągów tekstowych, które chcesz odwrócić, na przykład „dodaj wiodące zera w programie Excel"Do"lecxE ni sorez gnidael dda”. Możesz odwrócić tekst, wykonując następujące czynności:

1. Przytrzymaj ALT + F11 klucze i otwiera plik Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujące makro w Modułokno.

Function Reversestr(str As String) As String
    Reversestr = StrReverse(Trim(str))
End Function

3. Następnie zapisz i zamknij ten kod, wróć do arkusza i wprowadź tę formułę: = reverseestr (A2) do pustej komórki, aby umieścić wynik, patrz zrzut ekranu:

4. Następnie przeciągnij uchwyt wypełniania w dół, aby skopiować tę formułę, a tekst w komórkach jest od razu czczony, patrz zrzut ekranu:


strzałka niebieski prawy bąbelek Odwróć kolejność słów oddzielonych specjalnym separatorem z kodem VBA

Jeśli masz listę słów w komórce oddzielonych przecinkami jako „nauczyciel, lekarz, student, pracownik, kierowca”I chcesz odwrócić kolejność słów, na przykład„kierowca, pracownik, student, lekarz, nauczyciel”. Możesz także użyć podążania za VBA, aby go rozwiązać.

1. Przytrzymaj ALT + F11 klucze i otwiera plik Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujące makro w Moduł okno.

Sub ReverseWord()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Sigh As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Sigh = Application.InputBox("Symbol interval", xTitleId, ",", Type:=2)
For Each Rng In WorkRng
    strList = VBA.Split(Rng.Value, Sigh)
    xOut = ""
    For i = UBound(strList) To 0 Step -1
        xOut = xOut & strList(i) & Sigh
    Next
    Rng.Value = xOut
Next
End Sub

3. Następnie naciśnij F5 klawisz, zostanie wyświetlone okno dialogowe, wybierz zakres do pracy. Zobacz zrzut ekranu:

4. A następnie naciśnij Ok, pojawi się kolejne okno dialogowe, w którym możesz określić separator, na podstawie którego chcesz odwrócić słowa, patrz zrzut ekranu:

5. Następnie kliknij OKi możesz zobaczyć, że wybrane słowa są odwrócone, zobacz zrzuty ekranu:


strzałka niebieski prawy bąbelek Odwróć ciąg tekstowy lub kolejność słów za pomocą Kutools for Excel szybko i łatwo

Połączenia Kutools dla programu Excel'S Odwróć kolejność tekstu może pomóc w szybkim i wygodnym odwróceniu różnych ciągów tekstowych. Może wykonywać następujące operacje:

Odwróć tekst od prawej do lewej, na przykład „dotknij kilku słów"Do"sdrow emo pat";

Odwróć tekst są oddzielone spacją lub innymi określonymi znakami, takimi jak „winogrono jabłkowo pomarańczowe"Do"winogrono pomarańczowe jabłko";

Kutools dla programu Excel : z ponad 300 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni

Odwróć tekst od prawej do lewej:

1. Wybierz zakres, który chcesz odwrócić.

2. Kliknij Kutools > Narzędzia tekstowe > Odwróć kolejność tekstuzobacz zrzut ekranu:

3, w Odwróć tekst w oknie dialogowym wybierz odpowiednią opcję z Separator które odpowiadają wartościom komórek. Możesz wyświetlić podgląd wyników z pliku Okienko podglądu. Zobacz zrzut ekranu:

 Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!


Odwróć tekst są oddzielone spacją lub innymi określonymi znakami:

Ta funkcja może również pomóc w odwróceniu ciągów tekstowych oddzielonych określonymi znakami.

1. Wybierz komórki i zastosuj to narzędzie, klikając Kutools > Tekst > Odwróć kolejność tekstu.

2. W Odwróć tekst W oknie dialogowym wybierz separator oddzielający wartości komórek, na podstawie których chcesz odwrócić słowa, patrz zrzut ekranu:

3. Następnie kliknij Ok or Dodaj, słowa w komórkach zostały natychmiast zamienione. Zobacz zrzuty ekranu:

Note:Kontrola Pomiń elementy nietekstowe komórki, aby zapobiec odwróceniu liczb w wybranym zakresie.

Aby dowiedzieć się więcej o tej funkcji, odwiedź Odwróć kolejność tekstu.

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!


strzałka niebieski prawy bąbelek Demo: Odwróć ciąg tekstowy na podstawie określonego separatora za pomocą Kutools for Excel

Kutools dla programu Excel: z ponad 300 poręcznymi dodatkami do programu Excel, które można wypróbować bez ograniczeń w ciągu 30 dni. Pobierz i bezpłatną wersję próbną teraz!

Podobne artykuły:

Jak odwrócić imię i nazwisko w komórkach w programie Excel?

Najlepsze narzędzia biurowe

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ędzi12 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...

karta kte 201905


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!

 

Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Ik zoek een manier om een heleboel woorden in 'rijm-fabetische volgorde' te zetten. Dus de laatste letters van het woord moeten in alfabetische volgorde. Iemand enig idee? VrGr Amanda
This comment was minimized by the moderator on the site
This is truly a great help ... Thank you so much
This comment was minimized by the moderator on the site
awesome very helpful thanks for sharing the details
This comment was minimized by the moderator on the site
Thank you very much. This code helped my friend in a very good way
This comment was minimized by the moderator on the site
Is it possible to start the reverse at a certain character length (for the user-defined function or VBA code)? For example, reverse cell A1 values starting after the character count equal to B1 value. So if B1 is 10 characters reverse will start at characters 11+ in A1..
This comment was minimized by the moderator on the site
I found that the original Sub gave out the results with additional sigh at the end of all selected cells. So I fixed this part. For i = UBound(strList) To 0 Step -1 If i > 0 Then xOut = xOut & strList(i) & Sigh Else xOut = xOut & strList(i) Next Rng.Value = xOut
This comment was minimized by the moderator on the site
It's possible to reverse text using formula, it is repetitive and limited to how far you are prepared to go and subject to number of characters excel will allow in the formula bar. Max length of text will be 30 chars and is in cell A1. Cell B1 would read: =TRIM(MID(LEFT(A1&REPT(" ",31),31),30,1)&MID(LEFT(A1&REPT(" ",31),31),29,1)&MID(LEFT(A1&REPT(" ",31),31),28,1)&MID(LEFT(A1&REPT(" ",31),31),27,1)&MID(LEFT(A1&REPT(" ",31),31),26,1)&MID(LEFT(A1&REPT(" ",31),31),25,1)&MID(LEFT(A1&REPT(" ",31),31),24,1)&MID(LEFT(A1&REPT(" ",31),31),23,1)&MID(LEFT(A1&REPT(" ",31),31),22,1)&MID(LEFT(A1&REPT(" ",31),31),21,1)&MID(LEFT(A1&REPT(" ",31),31),20,1)&MID(LEFT(A1&REPT(" ",31),31),19,1)&MID(LEFT(A1&REPT(" ",31),31),18,1)&MID(LEFT(A1&REPT(" ",31),31),17,1)&MID(LEFT(A1&REPT(" ",31),31),16,1)&MID(LEFT(A1&REPT(" ",31),31),15,1)&MID(LEFT(A1&REPT(" ",31),31),14,1)&MID(LEFT(A1&REPT(" ",31),31),13,1)&MID(LEFT(A1&REPT(" ",31),31),12,1)&MID(LEFT(A1&REPT(" ",31),31),11,1)&MID(LEFT(A1&REPT(" ",31),31),10,1)&MID(LEFT(A1&REPT(" ",31),31),9,1)&MID(LEFT(A1&REPT(" ",31),31),8,1)&MID(LEFT(A1&REPT(" ",31),31),7,1)&MID(LEFT(A1&REPT(" ",31),31),6,1)&MID(LEFT(A1&REPT(" ",31),31),5,1)&MID(LEFT(A1&REPT(" ",31),31),4,1)&MID(LEFT(A1&REPT(" ",31),31),3,1)&MID(LEFT(A1&REPT(" ",31),31),2,1)&MID(LEFT(A1&REPT(" ",31),31),1,1)) Result: A1: Duncan Sullivan-Shaw B1: wahS-navilluS nacnuD Basically your text in cell A1 becomes 31 characters long by adding enough spaces to enable this, and each character is read singularly from right to left until you reach the first character. This will result in your reversed text containing leading spaces, which the TRIM command removes for you. To reduce or increase the length you would remove or add each statement. The number within the REPT statement should be 1 more than the maximum length you are working to and your first MID statement will start at the maximum length working down to 1.
This comment was minimized by the moderator on the site
hi all, i don't have Kutools to reverse a character of text, if anybody has this tools and want to help me, please send me email to send my file to you for reverse. my email is: [b][b][/b][/b] with regards,
This comment was minimized by the moderator on the site
please go through the instructions give by the extend office website after searching with google by reverse string in excel.
This comment was minimized by the moderator on the site
Hi I would like to reverse Dates. 20/11/2015 to 2015/11/20 Any Help? Thanks
This comment was minimized by the moderator on the site
For dates all you need to do is change the format of the cell to the format needed. Right click on the cell you would like to reverse and select format cell. Select Date under the category section and change the location from wherever you are to US or Czech or another country that may use the format you are interested in. Then pick the one that matches your requirements.
This comment was minimized by the moderator on the site
thank you its really useful for me :roll:
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations