Excel: nombres aléatoires toutes les 5 sec.

Résolu
paulo -  
 paulo -
Bonjour,

J'aimerais générer dans Excel des nombres aléatoires entre 2 bornes, mais à intervalles de temps régulier. C'est à dire j'aimerais que le nombre change de valeur toutes les 5 secondes pour un nouveau nombre aléatoire dans les mêmes bornes.

Pensez-vous que c'est possible?

Bien cordialement

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Sub Tirage_Aleatoire()
    Randomize ' Initialise le générateur de nombres aléatoires.

    With Worksheets(1)
    'Renvoie une valeur aléatoire comprise entre 10 et 50.
    'formule: Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
    .Range("A2") = Int((50 - 10 + 1) * Rnd + 10)
    End With
    'Intervalle de temps: 5 secondes
    CinqSecondes = TimeSerial(Hour(Time), Minute(Time), Second(Time) + 5)
    Application.OnTime CinqSecondes, "Tirage_Aleatoire"
    End Sub

    Bonne suite
    0
    1. paulo
       
      Merci c'est très bien tout ca !
      0