Discussion :

[spopo]

bonjour
je travail sous excel, j'ai une colonne qui contient des nombres, comment créer une macro qui sélectione de façon aléatoire un nombre en cliquant sur un bouton puis l'afficher.
Merci

[Louis-Guillaume Morand]

1- ca marche mieux dans le forum VBA

2- la methode rand() devrait t'aider

The worksheetfunction RAND() will return a decimal value greater than or equal to 0 and less than 1.
Here are some examples on how to use this function :
=RAND()*100 Returns a decimal value between 0 and 100 =RAND()*(100-50)+50 Returns a decimal value between 50 and 100 =ROUND(RAND()*100,0) Returns an integer value between 0 and 100.

3- j'ai ajouté le tag VBA.

[ouskel'n'or]

Hello,

Je ne sais pas si la solution de pharaonix marche en VBA... De mon côté, j'ai ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Randomize
    Tirage = Int((10 * Rnd) + 1)

où 10 est le nombre le plus grand que je veux obtenir.

A+

[leroissejp]

Bonjour,
Pour essayer ce code, place des nombres dans les cellules de A1 à A10.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Function Tirage(Rng As Variant, Optional Recalc As Boolean = False)
'Choisit une cellule au hasard dans une plage
'Rend la fonction volatile si Reclc est True
Application.Volatile Recalc
 Tirage = Rng(Int((Rng.Count) * Rnd + 1))
End Function
 
Sub test()
MsgBox Tirage(Range("A1:A10"), True)
End Sub

jpleroisse