Hvordan bytter eller skifter tekst rundt i en celle i Excel?
I mange tilfælde kan det være nødvendigt at bytte tekst rundt i en enkelt celle til nogle formål. For eksempel indeholder en celle et navn Smith John, du skal bytte teksterne inde i cellen for at ændre navnet til John Smith. Denne artikel viser nogle metoder til løsning af dette problem.
Byt eller skift tekst rundt i en celle ved hjælp af formlen
Byt eller skift tekst rundt i en celle ved hjælp af VBA-kode
Du kan nemt bytte eller skifte tekst i en celle af Kutools til Excel
Byt eller skift tekst rundt i en celle ved hjælp af formlen
Nedenstående formel kan hjælpe dig med at bytte tekster rundt i en celle i Excel. Gør som følger.
1. Vælg en tom celle for at finde de udskiftede data, indtast formlen i formellinjen, og tryk derefter på Indtast nøgle. Se skærmbillede:
=RIGHT(A2,LEN(A2)-FIND(" ",A2)) & " " & LEFT(A2,FIND(" ",A2)-1)
2. Vælg resultatcellen, og træk derefter Fyldhåndtaget ned for at få hvileresultaterne som vist nedenstående skærmbillede.
Derefter kan du se fornavn og efternavn byttes i specificerede celler.
Bemærk: Denne metode kan kun bytte to tekster inden for en celle, der er adskilt af mellemrum.
Du kan let bytte eller skifte tekst rundt i en celle i Excel:
Omvendt tekst nytte af Kutools til Excel kan hjælpe dig med let at bytte tekst rundt i en celle med en bestemt separator i Excel som nedenstående demo vist.
Download og prøv det nu! (30-dages gratis spor)
Byt eller skift tekst rundt i en celle ved hjælp af VBA-kode
Som vist ovenfor, kan du også køre følgende VBA-script for at bytte eller skifte tekst rundt i en celle.
1. Tryk på andre + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler. Kopier og indsæt derefter nedenstående VBA-kode i modulvinduet.
VBA-kode: Skift eller skift tekst inden for en celle
Sub res()
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 Sub3. Tryk på F5 nøgle for at køre koden. I pop op Kutools til Excel i dialogboksen, vælg det interval med data, du har brug for at bytte, og klik derefter på OK knap. Se skærmbillede:
Derefter kan du se tekster i det angivne navn celler udskiftes med det samme.
Bemærk: Denne kode kan også bytte to ord inden for en celle, der er adskilt af mellemrum korrekt.
Du kan nemt bytte eller skifte tekst i en celle af Kutools til Excel
Dette afsnit anbefaler omvendt tekstbestillingsværktøj af Kutools til Excel for at hjælpe dig med let at løse dette problem. Gør som følger.
Før påføring Kutools til Excel, Bedes download og installer det først.
1. Vælg det interval, der indeholder de tekster, du skal skifte, og klik derefter på Kutools > tekst > Omvendt tekstrækkefølge. Se skærmbillede:
2. i Omvendt tekst dialogboks, skal du angive en separator, du vil bytte teksterne baseret på i Separator afsnit. I dette tilfælde vælger jeg Space mulighed. Og klik derefter på OK .
Derefter kan du se data i valgte celler byttes i samme celle med specificeret separator med det samme.
Hvis du vil have en gratis prøveperiode (30 dage) af dette værktøj, klik for at downloade det, og gå derefter til at anvende handlingen i henhold til ovenstående trin.
Demo: Skift eller skift let tekst inden for en celle af Kutools til Excel
Relateret artikel:
Bedste kontorproduktivitetsværktøjer
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...
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!
