A la recherche d'une solution

Menezbarry Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   -
Quelles sont les combinaisons possibles lors d'un tirage avec remise de 3 numeros parmis 16 numeros numérotés de 1 a 16?

6 réponses

UnGnU Messages postés 1158 Date d'inscription   Statut Contributeur Dernière intervention   158
 
BONJOUR !

Réponse là !

De rien !
0
DjiDji59430 Messages postés 4253 Date d'inscription   Statut Membre Dernière intervention   700
 
Bonjour,

Va voir là :

https://www.dcode.fr/combinaisons

Crdlmt
0
Menezbarry Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Temps mort dû a l'occupation mais voilà l'inexistant de la combinaison (16 9 6). Au fait il ne figure pas dans cet ordre.c'est justifiable?
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Bonjour,

Il y a 4096 combinaisons possibles

Petite macro pour les afficher toutes
Sub tirages()
For n = 1 To 16
For m = 1 To 16
For j = 1 To 16
tir = n & ", " & m & ", " & j
x = x + 1
Range("B" & x) = tir
Next
Next
Next
End Sub

Cdlmnt
Via
0
Menezbarry Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour l'intervention mais je m'y vois pas bien dans le romaine alors Jaimerais que vous me guidiez un peu Si possible pour les afficher.
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
Voilà un exemple
https://mon-partage.fr/f/bsqf8FNb/
0
Menezbarry Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Finalement je n'arrive pas a ouvrir le fichier combinaisons xlms. Ya une solution a cela?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Places cette formule en A1 :
=MOD(ENT((LIGNES($1:1)-1)/(16^(COLONNES($A:A)-1)));16)+1
tires la jusqu'en C1 (3 colonnes)
Puis tires A1:C1 jusqu'en A4096:C4096
0
DjiDji59430 Messages postés 4253 Date d'inscription   Statut Membre Dernière intervention   700
 
Bonjour a tous

On sort plusieurs fois la meme combinaison, en realite, il n'y en a que 560

123, c'est pareil comme tirage que 132 ou 321.

Ce ne sont pas des arrangements que Menezbarry demande
Crdlmt
0
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Alors :
Sub test()
Dim c As Range
   Set c = [A1]
   c.Resize(1, 3).EntireColumn.Clear
   For a = 1 To 16
     For b = a + 1 To 16
       For d = b + 1 To 16
         c.Offset(0, 0).Value = a
         c.Offset(0, 1).Value = b
         c.Offset(0, 2).Value = d
         Set c = c.Offset(1)
       Next
     Next
   Next
   c.Resize(1, 3).EntireColumn.AutoFit
End Sub

Cdlt
0