Hoe kan ik tekst in een cel in Excel herschikken?
Stel dat je een spreadsheet hebt met een lange lijst met namen die allemaal opmaken als "Achternaam Voornaam", en nu moet je alle namen herschikken naar "Voornaam, Achternaam". Hoe bereik je dit? In dit artikel worden drie methoden geïntroduceerd waarmee u het probleem kunt oplossen.
Herschik tekst in een cel met formule
Herschik tekst in een cel met VBA-code
Herschik tekst snel in een cel met Kutools voor Excel
Herschik tekst in een cel met formule
De onderstaande formule kan u helpen de achternaam en voornaam in een cel in Excel om te draaien. Ga als volgt te werk.
1. Selecteer een lege cel om de herschikte tekst uit te voeren, voer de onderstaande formule erin in en druk op Enter.
= TRIM (MIDDEN (b2, SEARCH ("", b2) +1,250)) & "" & LINKS (b2, SEARCH ("", b2) -1)
Note: in de formule is B2 dat de cel de naam bevat die u wilt herschikken. Wijzig het op basis van uw behoefte.
2. Blijf de resultaatcel selecteren, sleep de vulhendel naar beneden om alle namen om te draaien, zoals onderstaand screenshot.
Herschik tekst eenvoudig in een cel in Excel:
De Tekst omkeren nut van Kutools for Excel kan u helpen om eenvoudig tekst binnen één cel om te wisselen met een bepaald scheidingsteken in Excel. Zie onderstaande screenshot:
Download en probeer het! (30 dagen gratis parcours)
Herschik tekst in een cel met VBA-code
Bovendien kunt u onderstaande VBA-code toepassen om alle namen in een lijst tegelijk in Excel om te draaien. Ga als volgt te werk.
1. druk de anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer vervolgens onderstaande VAB-code naar het modulevenster.
VBA-code: herschik tekst in een cel
Sub RearrangeText()
'Updated by Extendoffice 20180503
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. Vervolgens een Kutools for Excel dialoogvenster verschijnt. Selecteer de namenlijst die u opnieuw wilt rangschikken en klik vervolgens op de OK knop. Zie screenshot:
Vervolgens worden alle “Achternaam Voornaam” in de geselecteerde lijst onmiddellijk omgedraaid.
Herschik tekst snel in een cel met Kutools voor Excel
In dit gedeelte wordt het Omgekeerde tekstvolgorde nut van Kutools for Excel om u te helpen bij het herschikken van tekst in een cel.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. Selecteer de namenlijst waar u de “Achternaam Voornaam” omdraait en klik vervolgens op Kutools > Tekst > Omgekeerde tekstvolgorde. Zie screenshot:
2. In de Tekst omkeren dialoogvenster, selecteert u het Tussenruimte optie en klik vervolgens op de OK knop. Zie screenshot:
Vervolgens worden alle namen in de geselecteerde lijst in één keer opnieuw gerangschikt.
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.
Gerelateerde artikelen:
- Hoe de dag en maand van de datum in Excel om te wisselen of om te keren?
- Hoe kan ik tekst binnen één cel in Excel omwisselen of wisselen?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
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 honderden muisklikken voor u elke dag!