VBA Boucle et Randomize

Résolu
Bonjour à tous,

Je me permet de poster pour savoir comment vous faites pour combiner randomize et une boucle. J'aimerai avec une macro qu'une boucle incrémente automatiquement 30 lignes avec des nombres aléatoires.

Merci d'avance

2 réponses

  1. Bonjour a vous deux

    un exemple:

    Sub Nombres_Aleatoires()
        Range("A1:A30").ClearContents   'raz cellules
        'boucle de remplissage
        For x = 1 To 30
            Randomize       'pour obtenir des valeurs aleatoires
            Range("A" & x) = Int(100 * Rnd) + 1     'nombre entre 1 et 100
        Next x
    End Sub
    1. Exemple parfait, merci :)