Hoe schudt u de letters binnen woorden in Excel?
In sommige situaties kan het handig zijn om de letters binnen woorden in een Excel-werkblad willekeurig te schudden. Denk bijvoorbeeld aan het anonimiseren van gegevens, het maken van woordspellen of het opstellen van oefeningen voor onderwijs- en toetsdoeleinden. Zoals in de onderstaande schermafbeelding te zien is, beschikt u over een lijst met woorden, en het doel is om de letters van elk woord willekeurig door elkaar te halen. In het volgende artikel worden diverse effectieve methoden beschreven om deze taak uit te voeren — afgestemd op verschillende behoeften, Excel-versies en gebruikersvaardigheden.
Letters in woorden schudden met een door de gebruiker gedefinieerde functie
Letters in woorden eenvoudig schudden met Kutools voor Excel
Letters in woorden schudden met een Excel-formule (Excel 365 en nieuwer)
Letters in woorden schudden met een door de gebruiker gedefinieerde functie
Een handige manier om de letters van woorden in Excel te schudden, is door gebruik te maken van een door de gebruiker gedefinieerde functie (UDF) in VBA. Deze aanpak is ideaal voor gebruikers die toegang hebben tot de ingebouwde VBA-editor van Excel en vertrouwd zijn met het toepassen van aangepaste functies. De VBA-oplossing werkt in vrijwel alle Excel-versies en is eenvoudig herbruikbaar voor verschillende datasets.
Let op: Voor deze methode moeten macro’s zijn ingeschakeld. Sla uw werk altijd op voordat u VBA-code uitvoert of bewerkt, en gebruik alleen VBA-code van vertrouwde bronnen om mogelijke beveiligingsrisico’s te voorkomen.
Volg deze stappen om de letters binnen cellen te schudden met een aangepaste functie:
1. Druk tegelijkertijd op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik in het venster Microsoft Visual Basic for Applications op Invoegen > Module. Kopieer en plak vervolgens de onderstaande VBA-code in het geopende Code-venster. Zie de schermafbeelding ter referentie:
VBA-code: Letters in woorden schudden
Function Scramble(oldname)
On Error Resume Next
n = Len(oldname)
newname = ""
Do
i = Int(Rnd() * n) + 1
c = Mid(oldname, i, 1)
If c <> "*" Then
newname = newname & c
oldname = Replace(oldname, c, "*", , 1)
End If
Loop Until Len(newname) = n
Scramble = LCase(newname)
End Function
3. Nadat u de code hebt geplakt, drukt u op Alt+Q om de VBA-editor te sluiten en terug te keren naar uw Excel-werkblad.
4. Selecteer een lege cel in uw werkblad waar het geschudde woord moet verschijnen en voer de volgende formule in de formulebalk in. Als het woord dat u wilt schudden zich bijvoorbeeld in cel A2 bevindt, gebruikt u:
=scramble(A2)
Druk op Enter. Om andere woorden in de lijst te schudden, klikt u op de resultaatcel en sleept u de vulgreep omlaag om de formule automatisch in te vullen voor de resterende cellen. Het resultaat? Een willekeurig geschudde versie van elk woord! Bekijk de schermafbeelding voor een voorbeeld van hoe de geschudde woorden eruitzien in Excel:
Opmerking: In de formule verwijst A2 naar het oorspronkelijke woord dat u wilt schudden. Als uw gegevens zich in een andere kolom of rij bevinden, past u de celverwijzing dienovereenkomstig aan. De functie herschudt het woord telkens wanneer het werkblad opnieuw wordt berekend. Als u wilt dat de resultaten behouden blijven, kunt u deze kopiëren en als waarden plakken.
Voordelen: Werkt in de meeste Excel-versies en is aanpasbaar aan complexere behoeften.
Nadelen: Vereist het inschakelen van macro’s, kennis van VBA en is mogelijk niet toegestaan in organisaties met een strikt beveiligingsbeleid.
Letters in woorden eenvoudig schudden met Kutools voor Excel
Als u liever een eenvoudige, codevrije oplossing gebruikt, biedt Kutools voor Excel een handige tool om tekst in cellen te bewerken. Hoewel de functie Tekst omkeren geen volledige letter-schudder is, kunt u hiermee snel de volgorde van letters in een selectie omdraaien — ideaal voor eenvoudige schudbehoeften of het genereren van alternatieve tekstpatronen voor gegevenstests en educatieve oefeningen.
1. Selecteer eerst het bereik met cellen dat de woorden bevat die u wilt herschikken. Ga vervolgens naar het tabblad Kutools, klik op Tekst en kies Tekst omkeren, zoals hieronder wordt gedemonstreerd:
2. Geef in het dialoogvenster Tekst omkeren het scheidingsteken op dat u wilt gebruiken om te bepalen wat wordt omgekeerd. Kies voor het schudden van individuele letters de optie Geen en klik vervolgens op OK.
De geselecteerde woorden zijn nu herschikt door de lettervolgorde om te keren, zoals te zien is in de schermafbeelding hieronder. U kunt de bewerking ongedaan maken met Ctrl+Z als u het opnieuw wilt proberen of de optie voor het scheidingsteken wilt aanpassen.
Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen
Voordelen: Gebruiksvriendelijk en vereist geen programmeerkennis – ideaal voor snelle tekstmanipulatie. Zelfs perfect voor gebruikers zonder ervaring met formules of VBA.
Nadelen: Keert vooral de lettervolgorde om in plaats van een echte willekeurige schudfunctie te bieden, en de invoegtoepassing moet apart worden aangeschaft en geïnstalleerd.
Letters in woorden schudden met een Excel-formule (Excel 365 en nieuwer)
Excel 365 en nieuwere versies bieden krachtige dynamische matrixfuncties zoals SORTBY en RANDARRAY. Door deze te combineren met MID en SEQUENCE, kun je de letters in een woord willekeurig door elkaar gooien — en zo een volledig op formules gebaseerde schudoplossing creëren, zonder invoegtoepassingen of VBA-code. Deze methode is perfect voor moderne Excel-gebruikers die dynamische, formulegestuurde randomisatie van tekst binnen individuele cellen nodig hebben.
Deze aanpak levert het beste resultaat als u een reproduceerbare en volledig transparante schudder wilt bouwen met behulp van hulpkolommen. Zo gaat u te werk:
1. Stel dat uw oorspronkelijke woord zich in cel A2 bevindt. Voer de volgende formule in cel B2 in:
=TEXTJOIN("", TRUE, SORTBY(MID(A2, SEQUENCE(LEN(A2)),1), RANDARRAY(LEN(A2))))2. Druk op Enter. De geschudde versie van het woord in A2 verschijnt direct in B2. Selecteer cel B2 en gebruik de vulgreep om dit toe te passen op andere cellen in kolom A: sleep deze omlaag over het bereik waarin u meer woorden wilt schudden.
Uitleg van parameters:
- MID(A2; SEQUENCE(LEN(A2));1): splitst het woord in afzonderlijke letters.
- RANDARRAY(LEN(A2)): genereert een willekeurig getal voor elke letter, zodat het schudden mogelijk wordt.
- SORTBY(...; RANDARRAY(...)): sorteert de letters op basis van willekeurige getallen om ze te schudden.
- TEXTJOIN(„"; WAAR; ...): voegt de geschudde letters weer samen tot één woord.
Tip: Telkens wanneer het werkblad opnieuw wordt berekend, verandert het geschudde resultaat, omdat het afhangt van willekeurig gegenereerde getallen. Wilt u statische resultaten? Kopieer dan de uitvoercellen en plak ze als waarden. Ziet u een #NAAM?-fout? Controleer dan of u Excel 365 gebruikt of een versie die SORTBY en RANDARRAY ondersteunt.
Voordelen: Geen code vereist, compatibel met elk werkblad dat dynamische matrices ondersteunt, en levert bij elke berekening een nieuwe, willekeurige schudding op.
Nadelen: Alleen beschikbaar in Excel 365 en nieuwer; werkt niet in oudere versies die geen ondersteuning bieden voor dynamische matrices.
Suggesties voor probleemoplossing: Als het resultaat niet wordt bijgewerkt, controleer dan of de berekeningsmodus is ingesteld op Automatisch (Formules > Berekeningsopties > Automatisch). Controleer ook op typefouten in de formule en zorg ervoor dat de uitvoercellen zijn opgemaakt als Algemeen of Tekst. Als de door elkaar gehaalde woorden niet zoals verwacht verschijnen, verwijder eventuele filters of gegevensvalidatie die de update van de formule kunnen blokkeren.
Samenvattende tips: Voor de meeste gebruikers biedt de formulemethode een snelle en effectieve manier om letters door elkaar te halen, mits u een recente versie van Excel gebruikt. Als u vaste, door elkaar gehaalde resultaten nodig heeft of oudere Excel-versies moet ondersteunen, overweeg dan de VBA-methode of Kutools als alternatieven.
Gerelateerde artikelen:
- Hoe gebruikt u Voorwaardelijke opmaak om cellen in Excel op te maken op basis van de eerste letter of het eerste teken?
- Hoe zet u alle letters in een cel of kolom om naar hoofdletters in Excel?
- Hoe filtert u waarden op basis van de eerste letter of het laatste teken in Excel?
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins