Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Générer et Figer nombres aléatoires dans Excel

541 views
Skip to first unread message

AnneLakour

unread,
Jun 22, 2021, 11:18:12 AM6/22/21
to
Bonjour,
Serait-il possible de :
dans une feuille excel la cellule A1 génère 1 nbre aléatoire entre bornes
(0-36) et le fige dans la cellule A2..
faire entrée pour générer un autre nbre et le figer dans A3..
faire entrée pour générer un autre nbre et le figer dans A4....
ainsi de suite jusqu'à A100 ou A500 suivant les besoins.
Merci pour toutes suggestions.

MichD

unread,
Jun 22, 2021, 12:26:50 PM6/22/21
to
Bonjour,

Pour figer les résultats, tu dois utiliser une procédure en VBA.
La fonction Alea() est une fonction volatile, c'est-à-dire qu'elle se
met à jour chaque fois qu'une cellule est modifiée.

En VBA, la procédure est à copier dans le module de la feuille où
l'action se déroule. Fais un clic droit sur l'onglet de la feuille et
choisis la commande "Visualiser le code". Tu copies ce qui suit dans la
page blanche.

Range("A1:A10") représente où seront copiées les valeurs entre 0 et 36.
tu auras éventuellement des doublons...

Si tu préfère, tu peux remplacer "Range("A1:A10") par l'expression
"Selection" sans guillemet. Pour lancer la macro,
Dans l'interface de calcul, Raccourci clavier Alt + F8
Tu choisis la macro et tu cliques sur le bouton "exécuter".

Je tiens pour acquis que tu as activé les macros dans Excel.

'---------------------------------------------
Sub test()
Dim Xmin As Long, Xmax As Long, C As Range
Xmin = 0 'Valeur minimale
Xmax = 36 'Valeur maximale

For Each C In Range("A1:A10")
Randomize
C.Value = Application.RandBetween(Xmin, Xmax)
Next
End Sub
'---------------------------------------------

MichD

MichD

unread,
Jun 22, 2021, 1:15:25 PM6/22/21
to
En complément, si tu utilises l'expression "Selection" au lieu de
désigner la plage de cellules, tu dois d'abord sélectionner ces cellules
en premier avant de lancer la procédure. Un nombre entre 0 et 36
s'affichera dans chacune des cellules de la sélection de cellules.

MichD

annelakour

unread,
Jun 25, 2021, 12:01:30 PM6/25/21
to
Le mardi 22 Juin 2021 à 17:18 par AnneLakour :
OK Exactement ce que je voulais.
Merci
0 new messages