programme pour réaliser des combinaisons pour jouer au kéno

[jfk]

bonjour,je recherche un programme capable de faire des combinaisons de chiffres, à partir de chiffres perso allant de 2 nos à 10 nos.

ex:1.2.3.4.5.6.7.8.9.......et 20.12.23.45.56.41.........
1.2.3 20.12.23
1.2.4 20.12.45


1.2.5 20.12.56 :1.2.3.20.12.56

ex:19 20 25 63 45 62 42 58 89 26 ............

19 63 45 58
19 62 89 26 ou 20 63 42 58 26

 

[Mytå]

salut John.F.Kenedey

Pas tres claire ta question mais bon soit des chiffres de 1 a 10 et une serie de sortie de 4 chiffres différents tu peux travailler avec ceci a toi de voir

Sub chiffres()
rang = 1
For a = 1 To 10
For b = 2 To 10
For c = 3 To 10
For d = 4 To 10
If a = b Or a = c Or a = d Or b = c Or b = d Or c = d Then
GoTo saut
End If
Cells(rang, 1).Value = a & "." & b & "." & c & "." & d
rang = rang + 1
saut:
Next d
Next c
Next b
Next a
End Sub

A toi de travailler pour ce que tu veux

Mytå º¿º

 

[Moa]

Salut JFK et les excelliens !

Tu devrais aller à l'accueil et puis aller à Téléchargement / Jeux, il doit y avoir un programme de JMGilles, qui fait ce que tu demandes.

@ +

Moa