Génération automatique d'un calendrier sportif pour 40 équipes

[boubou1973]

Bonjour,

J'organise chaque année un concours de pronostics entre amis sur les résultats de ligue 1.
En plus du pari classique 1N2, chaque joueur se retrouve en duel face à un autre joueur lors des 38 journées.
Je cherche donc un fichier qui me permettrait de générer aléatoirement ces duels.
J'ai cherché sur excel downloads et sur internet des fichiers de ce type mais cela dépasse rarement 20 équipes.
J'ai trouvé le fichier tournoisport (que je joins) qui rend à peu près ce que je recherche mais il est complètement verrouillé donc cela m'oblige à recopier 38 x 39 prénoms soit 1482 entrées.... ça pique !
S'il y avait la possibilité que la génération soit sous le format mis en exemple dans le fichier "exemple duel", ce serait parfait car cela me permettrait de l'intégrer rapidement au fichier de mon jeu.

Je ne sais pas si je suis assez clair et reste à votre disposition pour tout renseignement.
Merci d'avance pour l'aide que vous pourrez m'apporter,
boubou

 

[boubou1973]

Bonjour Dranreb
tout d'abord, merci d'avoir à nouveau pris le temps de regarder mon poste.
Je ne connais rien aux codes donc votre demande est un peu du chinois pour moi mais j'ai tenté de cliquer sur débogage et j'ai vu qu'il y a quelque chose de surligné donc je me dis que cela peut correspondre à votre demande....

J'ai tenté de supprimer les premières lignes faisant référence à des cellules qui effectivement ne servent à rien pour le tirage mais cela n'a pas changé le problème.

Au pire, si vous ne voulez pas vous ennuyer, je vous propose de m'envoyer le fichier avec les 80 colonnes puisqu'il semble que vous ayez essayé. Je pourrai ainsi tester chez moi.

Je vous souhaite un bon WE, boubou

 

[Dranreb]

Bonjour.
Le voici.

 

[boubou1973]

Merci.
le problème semble donc venir de mon ordinateur car le même message s'affiche lorsque je lance le tirage depuis chez moi. Je n'y comprends rien

 

[soan]

Bonjour,

oh la belle fonction récursive qui s'appelle elle-même ! ... mais qui finit par planter à cause d'un bête débordement de pile ! alors un indice : il faut sans doute revoir la condition de sortie ! c'est comme, par exemple, pour le tri QuickSort : c'est aussi une procédure récursive ! je te laisse voir la suite avec Dranreb. ​

soan

 

[Dranreb]

À tout hasard allez en débogage, mettez le curseur sur 'NivMax' dans l'instruction qui plante, clic droit, Ajouter un espion…, OK
Mettez aussi un espion sur Niv
Normalement NivMax doit être lignes × colonnes - 1 et Niv va être la profondeur atteinte à saturation de la pile.

 

[boubou1973]

alors j'ai cliqué sur mettre un espion et appuyé sur ok.
a tout hasard j'ai enregistré et j'ai fermé.
J'ai refermé le débogeur et ai tenté de relancer le fichier avec le même résultat.
Je ne sais pas à quoi sert un espion donc difficile de vous aider

PS : je vais essayer sur mon ordi portable pour voir

 

[Dranreb]

L'espion permet de vérifier dans la fenêtre Espions les valeurs des variables. Que valaient elles ?

 

[soan]

@boubou1973

Je ne sais pas à quoi sert un espion

ça sert à voir quelle est la valeur d'une variable VBA.

soan

 

[Dranreb]

il faut sans doute revoir la condition de sortie !

NivMax ne change jamais durant tout le processus, et l'appel récursif n'a lieu qu'à cette condition :

If Niv < NivMax Then RencTrouvée = RencTrouvée(Niv + 1) Else RencTrouvée = True

 

[boubou1973]

voilà les valeurs de l'espion

je pars au sport et regarderai au retour si cela vous a aidé. En tout cas merci du fond du coeur à vous 2 de vous pencher sur mon cas

 

[Dranreb]

Il semblerait que ce soit effectivement un espace pile de mémoie insuffisant. Jamais vu ça !
On doit pouvoir l'augmenter, mais j'ignore totalement comment !

 

[soan]

en choisissant une RAM de 32 Go au lieu de 16 Go ?

 

[Dranreb]

Et surtout corriger la taille allouée à la pile. Je pense que c'est paramétrable quelque part …

Comment augmenter l'espace pile

Cette astuce n'augmentera en rien les performances de votre machine. Elle permet uniquement d'éviter un plantage.

www.zebulon.fr

Chez moi il n'y a aucune ligne MinSps= dans la section [386Enh] de mon C:\Windows\system.ini
Y en aurait-il une chez vous qui la limiterait ?

 

[soan]

@Dranreb

j'ai suivi ton lien ; à priori, ça semble être une bonne idée, mais : a) l'article est plutôt ancien : il date du 18 mars 2002 ; b) en bas, juste sous le texte « Par Claude Fortin », les différentes versions de Windows indiquées sont : « 95 ; 98 ; 98 SE ; MILLENIUM » ; c) il me semble bien que les versions plus récentes de Windows ne lisent même plus le fichier SYSTEM.INI ! donc à fortiori, une modif de la section [386Enh] ne sera pas prise en compte puisqu'elle ne sera pas lue ! désolé, mais j'crois bien qu'ça fait « chou blanc » !​

soan

 

[Dranreb]

Chercher donc vers une autre voie s'il te plait.