Fonction VBA : Rnd

La fonction VBA Rnd renvoie un nombre aléatoire inférieur à 1 et supérieur ou égal à 0.

Utilisation :

Rnd

Exemple d'utilisation

Quelques exemples de valeurs retournées par la fonction Rnd :

Sub exemple()
    
    Randomize
    
    MsgBox Rnd 'Renvoie par exemple : 0.1790262
    MsgBox Rnd 'Renvoie par exemple : 0.734448
    MsgBox Rnd 'Renvoie par exemple : 0.4870669
    MsgBox Rnd 'Renvoie par exemple : 0.9100572
    MsgBox Rnd 'Renvoie par exemple : 0.7860449
    MsgBox Rnd 'Renvoie par exemple : 0.1607063
    
End Sub

Important : ajoutez toujours l'instruction Randomize dans votre procédure ou fonction avant d'utiliser la fonction Rnd (pour éviter de vous retrouver avec des résultats beaucoup moins aléatoires que prévu).

Générer un nombre entier aléatoire entre 1 et 10 en utilisant la fonction Rnd :

Function nombreAlea()
    
    Randomize
    
    nombreAlea = Int(Rnd * 10 + 1)
    
End Function

Sub exemple()
    
    MsgBox nombreAlea 'Renvoie par exemple : 6
    MsgBox nombreAlea 'Renvoie par exemple : 2
    MsgBox nombreAlea 'Renvoie par exemple : 10
    MsgBox nombreAlea 'Renvoie par exemple : 7
    MsgBox nombreAlea 'Renvoie par exemple : 9
    MsgBox nombreAlea 'Renvoie par exemple : 1
    MsgBox nombreAlea 'Renvoie par exemple : 8
    
End Sub