Bonjour le Forum,
Je cherche à générer un nombre aléatoire entre 1 et 9999
dans une colonne A2 --> jusqu’à la dernière ligne remplie
Sachant qu'il ya toujours une valeur dans la colonne B:B
J'ai trouvé ce code sur Excelabo mais je ne sais pas trop comment l'adapter......
QQn aurait une idée?
bonne journée
Seb
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Comment remplir une colonne avec 200 nombres qui ne se répètent jamais ? Sans macro : en A1 =ALEA() en B1=RANG(A1;A:A) recopier vers le bas x fois selon l'étendue souhaitée en colonne B on obtient x nombres sans jamais 2 fois le même! Faire F9 pour une nouvelle génération avec VBA : Garanti sans doublon et sans boucle : sub tirage() leMax = InputBox("Valeur max", "Valeurs de 1 à valeur max") Application.ScreenUpdating = False [A1] = 1 [A1].DataSeries Rowcol:=xlColumns, Type:=xlLinear, Step:=1, Stop:=leMax Range("B1:B" & leMax).Formula = "=RAND()" [A:B].Sort Key1:=Range("B1"), Order1:=xlAscending [B:B].Delete [A1].Select end sub
Partager