IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

lister des combinaisons


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Octobre 2012
    Messages
    6
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2012
    Messages : 6
    Points : 1
    Points
    1
    Par défaut lister des combinaisons
    Bonsoir,

    J'ai calculé le nombre de combinaisons au jeu simple:
    49*48*47*46*45/5*4*3*2*1 soit environ 2 millions
    maintenant on peut jouer à 10 numéros de 1 à 49:

    Pourriez vous m'indiquer le moyen de lister toutes les séries de 10 nombres de 1 à 49 qui incluent la totalité des 2 millions de combinaisons à 5 nombres?

    (à main levée j'en ai compté près de 250 000 mais je me suis trompé?

    il faut une macro? j'ai Excel 2007 qui comporte 1.2 million de lignes

    c'est l'option duo sur la grille qui regroupe 2 séries de 5.

    merci

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Développeur VBA/C#/VB.Net/Power Platform
    Inscrit en
    Juillet 2007
    Messages
    14 593
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur VBA/C#/VB.Net/Power Platform
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 593
    Points : 34 250
    Points
    34 250
    Par défaut
    Bonjour,

    les dénombrements liés au loto sont souvent utilisés pour faire des calculs combinatoires

    La fonction Excel qui permet de calculer le nombre de tirages différents:
    - sans remise
    =COMBIN(49;5) qui te donne effectivement un peu moins de 2 millions de possibilités
    - avec remise
    = PERMUTATION(49;5) qui te donner un peu moins de 229 millions de possibilités

    Pour obtenir la liste des combinaisons, tu peux faire des boucles (5, 1 pour chaque numéro de boule tirée)
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Octobre 2012
    Messages
    6
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2012
    Messages : 6
    Points : 1
    Points
    1
    Par défaut
    Bonjour
    Merci de répondre
    ma question était plus simple:
    il y a 2 millions de combinaisons de 1 à 49 avec 5 numéros cochés.

    Si je coche 10 numéros au lieu de 5, combien de grilles faudra til pour faire toutes les 2 millions de combinaisons possibles?

    ex:
    je fais 1 2 3 4 5 6 7 8 9 10
    ça correspond à 12345, 12346, etc ..; 6 7 8 9 10 soit 1 combinaison de 10 équivaut à 250 de 5.

    merci
    le pb sera pour 1 2 47 48 49 ? à mon avis ce sera difficile?

  4. #4
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Développeur VBA/C#/VB.Net/Power Platform
    Inscrit en
    Juillet 2007
    Messages
    14 593
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur VBA/C#/VB.Net/Power Platform
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 593
    Points : 34 250
    Points
    34 250
    Par défaut
    Pour le coup, je ne comprends pas ce que tu cherches à faire

    Tu parles de 5 puis de 10, c'est le nombre de boules tirées à chaque tirage ?

    Si tu tires 10 boules à chaque fois, ce ne sont pas 2 millions de tirages possibles, mais plus de 8 milliards...

    Quel est ton but exact et que cherches tu à obtenir ?
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  5. #5
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Octobre 2012
    Messages
    6
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2012
    Messages : 6
    Points : 1
    Points
    1
    Par défaut
    => quand je coche 5 numéros sur 49 j'ai 2 millions de combinaisons possibles.

    Maintenant on peut cocher 10 numéros au lieu de 5

    je pensais que ça diminuerait le nb de combinaisons de 2 millions possibles de 5 cochés à X de 10 numéros cochés?
    C'est la liste de toutes les combinaisons de 10 numéros que je voudrais ?

    sauf que je pense que pour être sûr de gagner il faut bien les 8 milliards !

    avis ?

    j'ai donné un ex plus haut:

    je coche 1 2 3 4 5 6 7 8 9 10
    ça correspond à 12345, 12346, etc ..; 6 7 8 9 10 soit 1 combinaison de 10 nombres équivaut à 250 de 5 nombres.
    s'il suffisait de diviser 2 millions par 250....

  6. #6
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Développeur VBA/C#/VB.Net/Power Platform
    Inscrit en
    Juillet 2007
    Messages
    14 593
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur VBA/C#/VB.Net/Power Platform
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 593
    Points : 34 250
    Points
    34 250
    Par défaut
    Je pense qu'un cours sur les combinaisons et permutations serait de bon aloi

    On calcule le nombre de combaisons avec (n!) / k!.(n-k)!

    Ton nombre de combinaisons vaut
    pour 5 => 49! / 5!*44! = 1 906 884
    pour 10 => 49! / 10! 39! = 8 217 822 536
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  7. #7
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Octobre 2012
    Messages
    6
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2012
    Messages : 6
    Points : 1
    Points
    1
    Par défaut
    on ne se comprend pas
    c'est pas grave !
    je savais calculer les permutations je voulais savoir si on pouvait réduire le nombre de combinaisons possibles sachant qu'il y avait possibilité de cocher 10 numéros ( système réducteur)


    A+

  8. #8
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Développeur VBA/C#/VB.Net/Power Platform
    Inscrit en
    Juillet 2007
    Messages
    14 593
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur VBA/C#/VB.Net/Power Platform
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 593
    Points : 34 250
    Points
    34 250
    Par défaut
    tu coches 10 numéros sur les 49, mais seulement 5 sont tirés ?

    C'est bien cela ?

    Et auquel cas tu souhaites définir quoi ?
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  9. #9
    Nouveau Candidat au Club
    Profil pro
    Inscrit en
    Octobre 2012
    Messages
    6
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2012
    Messages : 6
    Points : 1
    Points
    1
    Par défaut
    Oui c'est le nouveau loto (option duo qui cumule les 2 grilles de 5=10)
    on tire 5 numéros sur 49
    Comme 1 2 3 4 5 6 7 8 9 10 équivaut déjà à 250 grilles de 5 (12345,12346,12347....6 7 8 9 10) je me disais qu'on pourrait calculer le nombre de grilles à 10 numéros "équivalentes" au 2 millions possibles de 5 ?

    ce serait trop simple de diviser 2 millions par 250 ?

    merci

Discussions similaires

  1. Réponses: 16
    Dernier message: 06/11/2005, 15h37
  2. lister des fichiers selon des critères
    Par Corben dans le forum EDI, CMS, Outils, Scripts et API
    Réponses: 12
    Dernier message: 18/10/2005, 16h52
  3. [langage] Lister des répertoires
    Par GLDavid dans le forum Langage
    Réponses: 3
    Dernier message: 27/07/2004, 17h46
  4. lister des dossiers dans un ComboBox
    Par taulmaril dans le forum Windows
    Réponses: 7
    Dernier message: 01/05/2004, 14h31
  5. Réponses: 2
    Dernier message: 22/07/2002, 18h02

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo