Tirage aléatoire avec élimination successive dépendant du résultat

Bonjour,

Je souhaite créer une automatisation afin de répondre à une problématique de probabilité avec élimination de tirages.

CAS CONCRET :

Au départ : j'ai 200 dés qui peuvent afficher les faces 1, 2, 3, 4, 5 et 6.

Je fais un premier lancé de mes 200 dés. => donc tirage aléatoire entre 1 et 6 pour 200 dés. => J'ai utilisé la fonction ALEA.ENTRE.BORNES(1;6) dans 200 cases.

Ceux qui affichent "6" sont éliminés. => Je compte avec =NB.SI(B3:B202;"<6") le nombre de dés qui n'affichent pas "6".

Je relance ceux qui restent. => J'ai un souci car je ne sais pas comment faire pour dire que je ne dois plus prendre que ce nouveau nombre de cases

Ceux qui affichent "6" sont éliminés.

Et ainsi de suite jusqu'à ce que je tombe à "zéro" dés restants.

Je dois ensuite dresser un tableau à 2 colonnes avec le numéro du tirage (de "0" où j'ai encore 200 dés au "dernier" où j'ai zéro dés).

Puis faire le graphique de la décroissance du nombre de dés en fonction du numéro du tirage.

Je vous joins un fichier pour essayer d'être plus explicite.

Merci de votre aide pour automatiser la partie qui me manque... ou peut-être tout revoir dans ma manière de penser le problème !! LOL

HBcrayon

13tiragedes.xlsx (31.79 Ko)

bonjour hbcrayon,

on n'utilise que les cellules vertes&oranges et avec F9, on a chaque fois une nouvelle série d'éliminations.

Ce chiffre en rouge, c'est la dernière fois qu'on a des dès >0

13tiragedes.xlsx (103.09 Ko)

Bonjour hbcrayon , BsAlv ,

Une version en VBA. Le code est dans Module1. Il est commenté.

Cliquez sur le bouton Hop !

Rechercher des sujets similaires à "tirage aleatoire elimination successive dependant resultat"