Hello, ya plus simple...
' Déclaration des variables.
Dim intVal as integer
Dim intRes as integer
intVal = 100
randomize
intRes = intVal - (Rnd * (intVal * 2))
Je viens de trouver cela, enfin c'est juste pour dire que je ne l'ai vérifié.
A++
Gally Home Corp
-------------------------------
Réponse au message :
-------------------------------
Resalut
Petit correctif (j'ai ajouté randomize avant la formule)
'sur la feuille mettre un bouton (command1)
'et un label (label1)
Const LimiteSup = 100
Const LimiteInf = -100
Private Sub Command1_Click()
Randomize 'Sert à initialiser le générateur de nombre aléatoire pour ne pas avoir à chaque fois la même série
Label1.Caption = Int((LimiteSup - LimiteInf + 1) * Rnd + LimiteInf)
End Sub
-------------------------------
Réponse au message :
-------------------------------
Salut
Voici la réponse :
'sur la feuille mettre un bouton (command1)
'et un label (label1)
Const LimiteSup = 100
Const LimiteInf = -100
Private Sub Command1_Click()
Label1.Caption = Int((LimiteSup - LimiteInf + 1) * Rnd + LimiteInf)
End Sub
a+
-------------------------------
Réponse au message :
-------------------------------
comment avoir une valeur random de (-100 à +100)
c'est soit rnd*(-100)
ou rnd*(100)
mais comment combiné les deux ??
kelkun le sait il ??