Astuce VBA : générer un code aléatoirement

Il est parfois utile de pouvoir générer un code aléatoire (numéro de référence, mot de passe, texte, etc.) à l’aide d’une macro.

Explications détaillées

Pour comprendre comment générer une chaîne de caractères aléatoirement en partant de la macro pour générer un nombre aléatoire, lancez cette vidéo :

Voici une copie du code à utiliser pour générer une code aléatoire de 10 caractères :

Sub codeAleatoire()

    'www.excel-pratique.com/fr/astuces_vba/generer_codes_aleatoires
    Randomize
 
    carac = "ABCD1234"
    codeAlea = ""
 
    For i = 1 To 10 '10 = longueur du code
        nombreAleatoire = Int(Len(carac) * Rnd) + 1
        codeAlea = codeAlea & Mid(carac, nombreAleatoire, 1)
    Next
 
    MsgBox codeAlea
    
End Sub