Hoe letters in woorden in Excel te scramblen?

Stel dat je een lijst met woorden hebt en je moet alle letters in deze woorden voor een bepaald doel scramblen, zoals in de onderstaande schermafbeelding te zien is. Probeer dan de methoden in dit artikel.

Letters in woorden scramblen met een door de gebruiker gedefinieerde functie
Letters in woorden eenvoudig scramblen met Kutools voor Excel

Letters in woorden scramblen met een door de gebruiker gedefinieerde functie

Je kunt letters in een cel scramblen met de onderstaande door de gebruiker gedefinieerde functie. Doe het volgende.

1. Druk gelijktijdig op de toetsen Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik in het Microsoft Visual Basic for Applications-venster op Invoegen > Module, kopieer en plak vervolgens de onderstaande VBA-code in het Code-venster. Zie screenshot:

VBA-code: Letters in woorden scramblen

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. Druk vervolgens op de toetsen Alt + Q om het Microsoft Visual Basic for Applications-venster te sluiten.

4. Selecteer een lege cel om de gescrambeld letters weer te geven, voer vervolgens de formule =scramble(A2) in de formulebalk in en druk op de Enter-toets. Blijf de resultaatcel selecteren en sleep de vulgreep naar beneden om alle resultaten te krijgen. Zie screenshot:

Opmerking: A2 is de cel die het woord bevat waarvan je de letters wilt scramblen. Pas dit aan zoals nodig.

Letters in woorden eenvoudig scramblen met Kutools voor Excel

Hierbij beveel ik een handige add-in aan - Kutools voor Excel. Met de utility Tekst omkeren kun je eenvoudig letters van gespecificeerde cellen scramblen met slechts enkele klikken.

1. Selecteer de cellen waarvan je de letters wilt scramblen, klik vervolgens op Kutools > Tekst > Tekst omkeren. Zie screenshot:

2. Specificeer in het dialoogvenster Tekst omkeren een scheidingsteken waarop je de letters zult scramblen in de sectie Scheidingsteken, en klik vervolgens op de knop OK.

Nu worden de geselecteerde woorden onmiddellijk gescrambeld, zoals in de onderstaande schermafbeelding te zien is.

Gerelateerde artikelen:

• Hoe cellen voorwaardelijk opmaken op basis van de eerste letter/teken in Excel?
• Hoe alle letters in een cel of kolom in Excel te kapitaliseren?
• Hoe waarden filteren op basis van de eerste letter of laatste teken in Excel?