Discussion :

[sefora]

Bonjour,

je souhaiterais savoir comment on fait pour afficher sous Excel la liste des combinaisons de 5 chiffres parmi 8 nombres

j'ai 8 nombres : 1 2 3 4 5 6 7 8

je peux choisir que 5 à la fois


pour les calculs je sais déjà , c'est avec la formule combin

mais je souhaite juste que Excel affiche la liste de toutes ces combinaisons

merci

[kiki29]

Salut, voir ici : Générer une série de nombres entiers aléatoires sans doublons

[sefora]

Salut, voir ici : Générer une série de nombres entiers aléatoires sans doublons

merci mais j 'ai pas trouvé

je souhaiterais qu'il affiche les 51 combinaisons on prenant 5 chiffres a chaque fois parmi les 8

ex : 1 2 3 4 5
1 2 3 7 8
4 5 6 1 8

[Menhir]

Il n'y a pas de fonctions Excel qui pourrait faire ça.
La seule solution est de passer par une macro en VBA.

[sefora]

Il n'y a pas de fonctions Excel qui pourrait faire ça.
La seule solution est de passer par une macro en VBA.

ok et quel serait le script pour la macro svp ?

merci

[Menhir]

quel serait le script pour la macro svp ?

Ce forum as pour vocation d'échanger des informations, pas de faire le travail des autres à leur place.

je souhaiterais qu'il affiche les 51 combinaisons on prenant 5 chiffres a chaque fois parmi les 8

Il y a une chose qui m'étonne.
Choisir 5 valeurs parmi 8, si l'ordre a de l'importance, ça fait 6720 combinaisons, si l'ordre n'a pas d'importance, ça fait 56 combinaisons.
Comment arrives-tu à ce chiffre de 51 ?

[papouclo]

Bonjour,
51 combinaisons ! Menhir a raison, il en manque.
J'ai hésité avant de ne pas être d'accord sur une autre réponse.

Il n'y a pas de fonctions Excel qui pourrait faire ça.
La seule solution est de passer par une macro en VBA.

Voici un classeur permettant d'écrire les combinaisons obtenue avec n éléments (n <= 15) pris p à p sans code VBA bien que le classeur soit compressé (à cause de la lourdeur : plus de 96000 formules sur 6450 lignes).
Il faut reconnaître que les formules sont assez indigestes malgré l'astuce de définir un nom court (test) pour une partie de la formule.
Malgré sa lourdeur déjà signalée, le fichier donne les 6435 combinaisons de 15 éléments pris 8 à 8 (ou 7 à 7) en environ 2 secondes.
Dernière remarque : On peut soit désirer traiter le problème de façon générale ou avoir besoin des 56 combinaisons pour 8 nombres pris 5 par 5.
Dans le second cas, c'est une perte de temps de ne pas les écrire "manuellement" sur Excel et de se lancer dans l'écriture d'un script VBA ou la recherche de formules alambiquées.
Cordialement
Claude

[Igloobel]

Bonjour à tous

Bravo papouclopour ton classeur !

je

bonne journée

[sefora]

Ce forum as pour vocation d'échanger des informations, pas de faire le travail des autres à leur place.


Il y a une chose qui m'étonne.
Choisir 5 valeurs parmi 8, si l'ordre a de l'importance, ça fait 6720 combinaisons, si l'ordre n'a pas d'importance, ça fait 56 combinaisons.
Comment arrives-tu à ce chiffre de 51 ?

oui c 'est bien 56 désolée c 'est une erreur de frappe , j ai juste écrit la fonction combin sur excel qui a fait le calcul


j 'ai juste quelque notions notion en vba, j ai appris comment lancer une macro ya pas longtemps

quand je fais une tache je l enregistre ensuite je visionne le code dans le module et donc je peux le modifier pour l adapter

après quelques recherches j ai trouvé ce code que j ai modifié et ca affiche les 56 combinaisons sur une seule colonne



Sub combinaisons()
lin = 1
col = 1
For m = 1 To 8
For n = m + 1 To 8
For o = n + 1 To 8
For p = o + 1 To 8
For q = p + 1 To 8
Cells(lin, col) = m & " " & n & " " & " " & o & " " & p & " " & q
lin = lin + 1
If lin > 65536 Then
col = col + 1
lin = 1
End If
Next q
Next p
Next o
Next n
Next m
End Sub


merci

[sefora]

Bonjour,
51 combinaisons ! Menhir a raison, il en manque.
J'ai hésité avant de ne pas être d'accord sur une autre réponse.

Voici un classeur permettant d'écrire les combinaisons obtenue avec n éléments (n <= 15) pris p à p sans code VBA bien que le classeur soit compressé (à cause de la lourdeur : plus de 96000 formules sur 6450 lignes).
Il faut reconnaître que les formules sont assez indigestes malgré l'astuce de définir un nom court (test) pour une partie de la formule.
Malgré sa lourdeur déjà signalée, le fichier donne les 6435 combinaisons de 15 éléments pris 8 à 8 (ou 7 à 7) en environ 2 secondes.
Dernière remarque : On peut soit désirer traiter le problème de façon générale ou avoir besoin des 56 combinaisons pour 8 nombres pris 5 par 5.
Dans le second cas, c'est une perte de temps de ne pas les écrire "manuellement" sur Excel et de se lancer dans l'écriture d'un script VBA ou la recherche de formules alambiquées.
Cordialement
Claude

merci beaucoup, il est est très bien ton tableau , moi j avais un code qui affiché les combinaisons sur une seule colonne

[Menhir]

Je te conseille d'essayer de comprendre le code que tu utilises. L'aide VBA intégrée à Excel est vraiment très pratique (quand on a compris comment l'utiliser) pour progresser dans la création de macro.

Ce code ne te donnera pas 56 combinaisons mais 6720 puisqu'il présente des listes ordonnées (dans lequel l'ordre à une importance).

Si tu veux que ça s'affiche sur plusieurs colonnes, change la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(lin, col) = m & " " & n & " " & " " & o & " " & p & " " & q

par les lignes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Cells(lin, col) = m
Cells(lin, col+1) = n
Cells(lin, col+2) = o
Cells(lin, col+3) = p
Cells(lin, col+4) = q

Conseils plus généraux :
- Déclare tes variables (voir l'instruction Dim)
- Fais des itérations sur tes boucles, ton code sera plus clair.

Un dernier conseil : comme le dis papouclo, tu perdras certainement bien moins de temps à établir une liste des 56 combinaisons à la main que d'essayer de le faire en automatique.

[sefora]

Je te conseille d'essayer de comprendre le code que tu utilises. L'aide VBA intégrée à Excel est vraiment très pratique (quand on a compris comment l'utiliser) pour progresser dans la création de macro.

Ce code ne te donnera pas 56 combinaisons mais 6720 puisqu'il présente des listes ordonnées (dans lequel l'ordre à une importance).

Si tu veux que ça s'affiche sur plusieurs colonnes, change la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Cells(lin, col) = m & " " & n & " " & " " & o & " " & p & " " & q

par les lignes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Cells(lin, col) = m
Cells(lin, col+1) = n
Cells(lin, col+2) = o
Cells(lin, col+3) = p
Cells(lin, col+4) = q

Conseils plus généraux :
- Déclare tes variables (voir l'instruction Dim)
- Fais des itérations sur tes boucles, ton code sera plus clair.

Un dernier conseil : comme le dis papouclo, tu perdras certainement bien moins de temps à établir une liste des 56 combinaisons à la main que d'essayer de le faire en automatique.

ok merci j ai compris maintenant comment afficher sur 4 colonnes

par contre mon code affiche bien 56 combinaisons et non 6720

[papouclo]

Bonjour,

Choisir 5 valeurs parmi 8, si l'ordre a de l'importance, ça fait 6720 combinaisons, si l'ordre n'a pas d'importance, ça fait 56 combinaisons.

6720 c'est quand l'ordre a de l'importance : dans les 6720 arrangements (je préfère ce terme pour éviter les confusions), on aura :
12345 mais aussi 23451 ou encore 12354 ...
Cordialement
Claude