Hoe kan ik tekst binnen één cel in Excel omwisselen of wisselen?

In veel gevallen moet u voor sommige doeleinden tekst in een enkele cel omwisselen. Een cel bevat bijvoorbeeld de naam Smit Jan, je moet de teksten in de cel omwisselen om de naam te wijzigen in Jan Smit. Dit artikel bevat enkele methoden om dit probleem op te lossen.

Wissel of wissel tekst binnen één cel met behulp van de formule
Wissel of wissel tekst binnen één cel door VBA-code te gebruiken
Wissel of wissel eenvoudig tekst binnen één cel door Kutools voor Excel

Wissel of wissel tekst binnen één cel met behulp van de formule

De onderstaande formule kan u helpen om teksten binnen één cel in Excel om te wisselen. Ga als volgt te werk.

1. Selecteer een lege cel om de verwisselde gegevens te zoeken, voer de formule in de formulebalk in en druk op Enter sleutel. Zie screenshot:

=RIGHT(A2,LEN(A2)-FIND(" ",A2)) & " " & LEFT(A2,FIND(" ",A2)-1)

2. Selecteer de resultaatcel en sleep vervolgens de vulhendel naar beneden om de restresultaten te krijgen, zoals onderstaand screenshot.

Vervolgens kunt u zien dat de voornaam en achternaam worden verwisseld in opgegeven cellen.

Opmerking:: Met deze methode kunnen alleen twee teksten binnen één cel worden omgewisseld die door een spatie zijn gescheiden.

Wissel of wissel tekst binnen één cel door VBA-code te gebruiken

Zoals het bovenstaande voorbeeld laat zien, kunt u ook het volgende VBA-script uitvoeren om tekst binnen één cel te wisselen of om te wisselen.

1. druk de anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer en plak vervolgens de onderstaande VBA-code in het modulevenster.

VBA-code: wissel of wissel tekst binnen één cel

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 Sub

3. druk de F5 sleutel om de code uit te voeren. Bij het opduiken Kutools for Excel dialoogvenster, selecteer het bereik met gegevens die u wilt verwisselen en klik vervolgens op de OK knop. Zie screenshot:

Vervolgens kunt u zien dat teksten in de opgegeven naamcellen onmiddellijk worden verwisseld.

Opmerking:: Deze code kan ook twee woorden binnen een cel wisselen die correct door een spatie zijn gescheiden.

Wissel of wissel eenvoudig tekst binnen één cel door Kutools voor Excel

In dit gedeelte wordt het hulpprogramma Omgekeerde tekstvolgorde van Kutools voor Excel aanbevolen, zodat u dit probleem gemakkelijk kunt oplossen. Ga als volgt te werk.

Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.

1. Selecteer het bereik met de teksten die u wilt wisselen en klik op Kutools > Tekst > Omgekeerde tekstvolgorde. Zie screenshot:

2. In de Tekst omkeren dialoogvenster, specificeert u een scheidingsteken waarop u de teksten wilt omwisselen op basis van in het Separator sectie. In dit geval selecteer ik het Tussenruimte optie. En klik vervolgens op het OK knop.

Vervolgens kunt u zien dat gegevens in geselecteerde cellen onmiddellijk in dezelfde cel worden verwisseld door het opgegeven scheidingsteken.

  Als u een gratis proefperiode (30 dagen) van dit hulpprogramma wilt, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.

Demo: verwissel of wissel eenvoudig tekst binnen één cel door Kutools voor Excel

Gerelateerd artikel:

• Hoe de dag en maand van de datum in Excel om te wisselen of om te keren?

De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

• visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
• Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
• Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
• Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
• Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
• Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
• Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
• Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
• Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.

Lees verder... Gratis download... Aankoop... 

---

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

• Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
• Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
• Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken voor u!

Lees verder... Gratis download... Aankoop...