Gå til hovedindhold

Hvordan omvendt tekststreng eller ordrerækkefølge i Excel?

Når du bruger Excel-regnearket, hvordan vender du tekststrengen eller ordrenes ordning i Excel? For eksempel vil du vende “Excel er et nyttigt værktøj for os"Til"su rof loot lufesu a si lecxE”. Eller nogle gange kan du ændre ordrenes rækkefølge som “Excel, Word, PowerPoint, OneNote"Til"OneNote, PowerPoint, Word, Excel”. Normalt er dette noget vanskeligt at løse dette problem. Se på følgende metoder:

Omvendt tekststreng med brugerdefineret funktion

Omvendt ordrækkefølge adskilt af specifik separator med VBA-kode

Omvend tekststreng eller ordreordre med Kutools til Excel hurtigt og nemt


pil blå højre boble Omvendt tekststreng med brugerdefineret funktion

Antag, at du har en række tekststrenge, som du vil vende om, såsom “tilføj førende nuller i Excel"Til"lecxE ni sorez gnidael dda”. Du kan vende teksten med følgende trin:

1. Hold nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende makro i Modulervindue.

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

3. Og gem derefter og luk denne kode, gå tilbage til regnearket og indtast denne formel: = reversestr (A2) i en tom celle for at placere resultatet, se skærmbillede:

4. Træk derefter fyldhåndtaget ned for at kopiere denne formel, og teksten i cellerne æres straks, se skærmbillede:


pil blå højre boble Omvendt ordrækkefølge adskilt af specifik separator med VBA-kode

Hvis du har en liste over celleord, der adskilles med kommaer som denne “lærer, læge, studerende, arbejdstager, chauffør”, Og du vil vende ordrækkefølgen som denne“kørsel, arbejdstager, studerende, læge, lærer”. Du kan også bruge follow VBA til at løse det.

1. Hold nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende makro i Moduler vindue.

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. Tryk derefter på F5 tast, en dialogboks vises, skal du vælge et interval at arbejde med. Se skærmbillede:

4. Og tryk derefter på Ok, vises en anden dialogboks, hvor du kan specificere den separator, du vil vende ordene baseret på, se skærmbillede:

5. Klik derefter på OK, og du kan se, at de valgte ord er omvendt, se skærmbilleder:


pil blå højre boble Omvend tekststreng eller ordreordre med Kutools til Excel hurtigt og nemt

Kutools til Excel's Omvendt tekstrækkefølge kan hjælpe dig hurtigt og bekvemt med at vende forskellige tekststrenge. Det kan udføre følgende handlinger:

Vend teksten fra højre til venstre, f.eks. “tryk på nogle ord"Til"sdrow emos pat"

Omvendt er teksten adskilt af mellemrum eller andre specifikke tegn, såsom “æble orange drue"Til"drue orange æble"

Kutools til Excel : med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage

Vend teksten fra højre mod venstre:

1. Vælg det interval, du vil vende om.

2. Klik Kutools > Tekstværktøjer > Omvendt tekstrækkefølge, se skærmbillede:

3. I Omvendt tekst dialogboks, skal du vælge den rigtige mulighed fra Separator som svarer til celleværdierne. Og du kan forhåndsvise resultaterne fra Forhåndsvis pane. Se skærmbillede:

 Download og gratis prøveversion Kutools til Excel nu!


Omvendt er teksten adskilt af mellemrum eller andre specifikke tegn:

Denne funktion kan også hjælpe dig med at vende tekststrengene, der er adskilt af bestemte tegn.

1. Vælg cellerne, og anvend dette værktøj ved at klikke på Kutools > tekst > Omvendt tekstrækkefølge.

2. I boksen Omvendt tekst dialogboks, vælg separatoren, der adskiller de celleværdier, du vil vende ordene baseret på, se skærmbillede:

3. Klik derefter på Ok or Indløs, ordene i cellerne er vendt på én gang. Se skærmbilleder:

Bemærk: Kontrol Spring ikke-tekst over celler for at forhindre dig i at vende numrene i det valgte interval.

Hvis du vil vide mere om denne funktion, kan du besøge Omvendt tekstrækkefølge.

Download og gratis prøveversion Kutools til Excel nu!


pil blå højre boble Demo: Omvendt tekststreng baseret på specifik separator med Kutools til Excel

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

Relateret artikel:

Hvordan vender jeg for- og efternavnet i celler i Excel?

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver 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