Bonjour.
j'utilise une macro pour générer une heure aléatoire entre une heure de départ et une heure de fin.
Le problème est, que c'est toujours la même heure qui sort du tirage aléatoire.
Ci-joint le code.
Var1 = TimeSerial(6, 45, 0) * 1000
Var2 = TimeSerial(9, 50, 0) * 1000
Var3 = Int((Var2 - Var1 + 1) * Rnd + Var1) / 1000
ActiveCell.Offset(0, 1).Value = Var3
ActiveCell.Offset(0, 1).NumberFormat = "h:mm"
Un petit coup de main serait le bien venu.
Cordialement.
j'utilise une macro pour générer une heure aléatoire entre une heure de départ et une heure de fin.
Le problème est, que c'est toujours la même heure qui sort du tirage aléatoire.
Ci-joint le code.
Var1 = TimeSerial(6, 45, 0) * 1000
Var2 = TimeSerial(9, 50, 0) * 1000
Var3 = Int((Var2 - Var1 + 1) * Rnd + Var1) / 1000
ActiveCell.Offset(0, 1).Value = Var3
ActiveCell.Offset(0, 1).NumberFormat = "h:mm"
Un petit coup de main serait le bien venu.
Cordialement.