Nombres aléatoires

[dtth_2003]

Bonjour, je ne suis pas vraimment un spécialiste d'Excel, juste les bases. Mais voici mon problème. J'aimerais générer 3 nombres aléatoires différents compris entre 1 et 16. La fonction ALEA ne me permet pas de faire trouver 3 différents.

Merci pour votre aide.

 

[Ti]

ben en fait, la limite est donnée théoriquement par les 2 intervalles mini et maxi. Si ton intervalle mini et 1 et ton intervalle maxi 16, tu auras 16 valeurs possibles. Donc inutile d'essayer d'en renvoyer 17...

sinon, en théorie, on peut ajouter autant de valeurs qu'on le désire à la liste des paramètres.

 

[dth_2003]

C'est bien ce que je pensais, je voulais juste être sur. Bien sur je me doutais de la limite des 16 valeurs possibles. Mais en fait ce qui m'interressais, c'est de pouvoir mettre plus de 16 valeurs dont certaines seraient des doublons et donc que je n'aurais pas encore les 16 possiblités !

Merci pour tout.

dth

 

[Mytå]

salut le Forum

Une autre facon de voir

Sub Aleatoire()
Dim Ligne As Byte
Dim nombre As Byte
nombre = 16 'entrer la valeur maximale ici 1 a 16
Randomize
Range("A2") = Int(nombre * Rnd + 1)
For Ligne = 1 To nombre - 1
Do
Cells(2, 1).Offset(Ligne, 0).Value = Int(nombre * Rnd + 1)
Loop Until IsError(Application.Match(Cells(2, 1). _
Offset(Ligne, 0), Cells(2, 1).Resize(Ligne, 1), 0))
Next Ligne
End Sub

Mytå