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 code_aleatoire()

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