Nb aléatoire avec evaluate

Le
jp
Bonjour,

En colonne 1 j'ai les valeurs mini en colonne 2 j'ai les valeurs
maxi.
J'utilise la macro suivante pour générer des valeurs aléatoires:

Sub AttribConsol()
For i = 3 To (Cells(1, 10).Value) / 10
a = Cells(i, 1).Value
b = Cells(i, 2).Value
Cells(i, 13) = Evaluate("=ALEA.ENTRE.BORNES(a,b)")
Next i
End Sub

En colonne 13 j'obtiens "#NOM?"

Quelqu'un saurait me dire où est l'erreur?
Merci d'avance

JP
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #18135931
Cells(i, 13) = Evaluate("RANDBETWEEN(" & A & "," & b & ")")

Si tu as une version antérieure à excel 2007, tu dois ajouter la
bibliothèque (référence) suivante à partir de la fenêtre de l'éditeur
de code : barre des menus / outils / references / ATPVBAEN.XLA





"jp"
Bonjour,

En colonne 1 j'ai les valeurs mini en colonne 2 j'ai les valeurs
maxi.
J'utilise la macro suivante pour générer des valeurs aléatoires:

Sub AttribConsol()
For i = 3 To (Cells(1, 10).Value) / 10
a = Cells(i, 1).Value
b = Cells(i, 2).Value
Cells(i, 13) = Evaluate("=ALEA.ENTRE.BORNES(a,b)")
Next i
End Sub

En colonne 13 j'obtiens "#NOM?"

Quelqu'un saurait me dire où est l'erreur?
Merci d'avance

JP
Jacky
Le #18135921
Bonjour,

Essaie
Cells(i, 13) = Evaluate("ALEA.ENTRE.BORNES(" & a & "," & b & ")")

Non testé , mais devrait faire
--
Salutations
JJ


"jp"
Bonjour,

En colonne 1 j'ai les valeurs mini en colonne 2 j'ai les valeurs
maxi.
J'utilise la macro suivante pour générer des valeurs aléatoires:

Sub AttribConsol()
For i = 3 To (Cells(1, 10).Value) / 10
a = Cells(i, 1).Value
b = Cells(i, 2).Value
Cells(i, 13) = Evaluate("=ALEA.ENTRE.BORNES(a,b)")
Next i
End Sub

En colonne 13 j'obtiens "#NOM?"

Quelqu'un saurait me dire où est l'erreur?
Merci d'avance

JP
jp
Le #18136461
Merci à michdenis et jacky, les deux fonctionnent!
JP

On 14 déc, 14:10, "Jacky"
Bonjour,

Essaie
 Cells(i, 13) = Evaluate("ALEA.ENTRE.BORNES(" & a & "," & b & ")")

Non testé , mais devrait faire
--
Salutations
JJ

"jp"
Bonjour,

En colonne 1 j'ai les valeurs mini en colonne 2  j'ai les valeurs
maxi.
J'utilise la macro suivante pour générer des valeurs aléatoires:

Sub AttribConsol()
   For i = 3 To (Cells(1, 10).Value) / 10
    a = Cells(i, 1).Value
    b = Cells(i, 2).Value
    Cells(i, 13) = Evaluate("=ALEA.ENTRE.BORNES(a,b)")
  Next i
End Sub

En colonne 13 j'obtiens "#NOM?"

Quelqu'un saurait me dire où est l'erreur?
Merci d'avance

JP


Publicité
Poster une réponse
Anonyme