Hoppa till huvudinnehåll

Hur omvänd textsträng eller ordningsordning i Excel?

När du använder Excel-kalkylbladet, hur vänder du textsträngen eller ordordningen i Excel? Till exempel vill du göra om ”Excel är ett användbart verktyg för oss"Att"su rof loot lufesu a si lecxE”. Eller ibland kan du vända ordens ordning som ”Excel, Word, PowerPoint, OneNote"Att"OneNote, PowerPoint, Word, Excel”. Normalt är detta något svårt att lösa detta problem. Titta på följande metoder:

Omvänd textsträng med användardefinierad funktion

Omvänd ordningsordning separerad med specifik avgränsare med VBA-kod

Omvänd textsträng eller ordningsordning med Kutools för Excel snabbt och enkelt


pil blå höger bubbla Omvänd textsträng med användardefinierad funktion

Om du antar att du har en rad textsträngar som du vill vända, till exempel “lägg till ledande nollor i Excel"Att"lecxE ni sorez gnidael dda”. Du kan vända texten med följande steg:

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande makro i Modulernafönster.

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

3. Och sedan spara och stäng den här koden, gå tillbaka till kalkylbladet och ange den här formeln: = reversestr (A2) i en tom cell för att sätta resultatet, se skärmdump:

4. Dra sedan ned fyllningshandtaget för att kopiera den här formeln och texten i cellerna vördas på en gång, se skärmdump:


pil blå höger bubbla Omvänd ordningsordning separerad med specifik avgränsare med VBA-kod

Om du har en lista över cellord som är separerade med kommatecken som detta “lärare, läkare, student, arbetare, förare”, Och du vill vända ordordningen så här“kör, arbetare, student, läkare, lärare”. Du kan också följa VBA för att lösa det.

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande makro i Modulerna fönster.

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. Tryck sedan på F5 , visas en dialogruta, välj ett intervall att arbeta med. Se skärmdump:

4. Och tryck sedan på Ok, en annan dialog dyker upp för att du ska kunna specificera avgränsaren som du vill vända på orden baserat på, se skärmdump:

5. Klicka sedan på OK, och du kan se att de valda orden är omvända, se skärmdumpar:


pil blå höger bubbla Omvänd textsträng eller ordningsordning med Kutools för Excel snabbt och enkelt

Smakämnen Kutools för ExcelÄr Omvänd textordning kan hjälpa dig snabbt och bekvämt att vända olika textsträngar. Det kan göra följande åtgärder:

Omvänd texten från höger till vänster, till exempel “knacka på några ord"Att"sdrow emos pat";

Omvänd texten är åtskilda av mellanslag eller andra specifika tecken, till exempel “äpple orange druva"Att"druva orange äpple";

Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar

Omvänd texten från höger till vänster:

1. Välj det intervall som du vill vända om.

2. Klicka Kutools > Textverktyg > Omvänd textordning, se skärmdump:

3. I Omvänd text välj rätt alternativ från Separator som motsvarar cellvärdena. Och du kan förhandsgranska resultaten från Förhandsgranska panelen. Se skärmdump:

 Ladda ner och testa gratis Kutools för Excel nu!


Omvänd texten är åtskilda av mellanslag eller andra specifika tecken:

Denna funktion kan också hjälpa dig att vända textsträngarna som skiljs åt av specifika tecken.

1. Markera cellerna och använd detta verktyg genom att klicka Kutools > text > Omvänd textordning.

2. I Omvänd text dialogrutan, välj separatorn som separerar cellvärdena som du vill vända på orden baserat på, se skärmdump:

3. Klicka sedan Ok or Ansök, orden i cellerna har vänt om på en gång. Se skärmdumpar:

Anmärkningar:Kontroll Hoppa över icke-text celler för att förhindra att du vänder siffrorna i det valda intervallet.

För mer information om den här funktionen, besök Omvänd textordning.

Ladda ner och testa gratis Kutools för Excel nu!


pil blå höger bubbla Demo: Omvänd textsträng baserad på specifik separator med Kutools för Excel

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!

Relaterad artikel:

Hur vänder du för- och efternamnet i celler i Excel?

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50 + Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!

 

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