Programmation excel

seydou86 Messages postés 29 Statut Membre -  
 sou -
Bonjour,
je sollicite votre aide , car je bloque sur un ptit programme que j'aimerai realiser. ca fait pas mal de temps que j'essaye de me servir d'excel , sans succes.
cette suite de combinaisons , j'y tient beaucoup , et si qq1 peut m'aider , je lui en serait tres reconnaissant.


j'ai => A , B , C , D , E

je veut faire des combinaisons de A B C D E

en 8 parties , 11 parties , et 15 parties


par exemple pour 8 parties
8A 0B 0C 0D 0E ou si vous preferez AAAAAAAA
7A 1B 0C 0D 0E ou si vous preferez AAAAAAAB

pour 11 parties
11A 0B 0C 0D 0E ou si vous preferez AAAAAAAAAAA
10A 1B 0C 0D 0E ou si vous preferez AAAAAAAAAAB

pour 15 partie
15A 0B 0C 0D 0E ou si vous preferez AAAAAAAAAAAAAA
14A 1B 0C 0D 0E ou si vous preferez AAAAAAAAAAAAAAB

je suis concient que ca fait beaucoup de combinaisons , meme pour 8 parties !

je sais que j'en demande beaucoup , mais sans les combinaisons , je ne peut plus avancer

j'espere que qq1 pourra m'aider .
le top sera de m'envoyer le fichier excel avec les combinaisons , mais quoi que vous pourrait faire , je vous en serait reconnaissant

merci a tous , et bonne nuit
A voir également:

18 réponses

Anonyme
 
Salut

P.tain ; j'ai compris ;-D) ====>>>> "7xA" = "7 fois la lettre A" ;-)
(je pensais à hexadécimale) :-)


Bon, alors ; c'est simple ; mais tu veux qu'elle serve, et s'affiche dans quoi, ta liste ?

Dans une cellule ? Ou plusieurs ? C'est juste pour être "calculer", mais pas affichée ?

C'est pas une simple formule dans une cellule que tu veux ?!


Chaque lettre ASCII, a un code correspondant en chiffre .
Dans un algorithme, c'est mieux les chiffres que les lettres !


La fonction CHR() va nous servir ; elle affiche le caractère qui correspond à un nombre .
Reste à créer une boucle pour générer toutes les combinaisons souhaitées . FOR THEN ELSE - SI .!

merci .

à+
1
Anonyme
 
Salut

Pour suivre ... :-) ; je veux connaître le fin mot de l'histoire ,-)

Peux-tu expliqué, "seydou86", autrement et un peu plus, ton problème et ce que tu veux faire ? merci .

C'est pas un mastermind => un jeu ; ce que tu veux faire ?

merci .

à+
0
seydou86 Messages postés 29 Statut Membre
 
bonjours anonyme
je veut toute ces combinaisons pour un jeux , mais ce n'est pas le mastermind.

je ne peut pas en devoilé plus.

merci
0
Anonyme
 
Salut

Pourquoi il y a des doubles ou je ne sais quoi ?
Comme ça "7A 1B 0C 0D 0E" ; les lettres sont deux par deux . C'est quoi et pourquoi ?

On te demande pas pour l'instant de nous dire tes "secrets" ; mais expliques ce que tu veux .
C'est quel type d'algorithme que tu veux ? Il y a beaucoup de possibilité dans ce que tu veux !

;-) on attend (tous ; et toujours), les renseignements ; merci .

à+
0

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

Posez votre question
seydou86 Messages postés 29 Statut Membre
 
bha regarde

en 8 partie avec A B C D E

donc AAAAAAAA, AAAAAAAB , AAAAAABB , ABAAAAAA

je ne voit pas comment expliquer mieux que ce que j'ai deja fait plus haut.

8xA 0xB 0xC 0xD 0xE ou si vous preferez AAAAAAAA
7xA 1xB 0xC 0xD 0xE ou si vous preferez AAAAAAAB
0
seydou86 Messages postés 29 Statut Membre
 
autre explication

on a 5 boules !

A B C D E

on fait 8 tirages , et entre chaque tirage on remet la boule !

l'ordre de tirage n'a pas d'importance.

voila , j'espere que c'est plus claire !

je doit partir travailler , j'espere que qq1 aura compris ce que j'aimerais avoir , il y a pas mal de combinaison .

milles merci d'essayer de m'aider , j'espere que vous y arriverai.
merci beaucoup
0
Papou93 Messages postés 147 Statut Membre 59
 
Bonjour seydou86,

Tu peux utiliser la fonction 'String' comme ci-dessous :

Private Sub MaChaine()
Dim ch As String
ch = String(Range("a3"), "A") & String(Range("b3"), "B") & String(Range("c3"), "C") & String(Range("d3"), "D") & String(Range("e3"), "E")
Range("A1") = ch

End Sub


Dans cet exemple, les nombres de A,B,C,D,E sont inscrits respectivement dans les cellules A1,B1,C1,D1 et E1. Le résultat s'affiche dans la cellule A1. Tu peux, bien sur, adapter ces emplacements à ton fichier.

Espérant avoir pu t'aider.

Cordialement.
0
seydou86 Messages postés 29 Statut Membre
 
j'aimerai que le resultats saffiche dans les autre cellule
je suis vraiment un novice excel !
je sais faire que 2.3 trucs

ya pas moyens d'envoyer le dossier excel ?

parce que je ne sais pas ou rentrer ce que papou ma donné

(vous allez vraiment me prendre pour un noob puissance 10 ! mais j'essaye de m'amelioré ... c'est en ecoutant les autres et en essayant qu'on progresse ! on a tous passé par la ! )


merci a vous de votre aide
je sent qu'on y est presque !
0
Papou93 Messages postés 147 Statut Membre 59
 
Re-bonjour seydou86,

Voici le lien du fichier exemple.

https://www.cjoint.com/?kkpbvcJtG3

Précises-moi l'affichage que tu veux obtenir et j'y regarderai.

Cordialement.
0
seydou86 Messages postés 29 Statut Membre
 
re papou93

l'affichage de type ABBCCDEE me parait tres bien

fait pour le mieux , pour que ton travaille soit le plus simplifier.

merci encore papou
0
Papou93 Messages postés 147 Statut Membre 59
 
Répondre à seydou86
Ce message vous semble utile, votez !Autres messages de seydou86Signaler ce message aux modérateursEnvoyer un message privé à seydou86Revenir au forum Forum programmation Par seydou86, le mercredi 10 octobre 2007 à 13h37:58

seydou86,

j'aimerai que le resultats saffiche dans les autre cellule

C'est cette demande que je saisis mal. Peux-tu me préciser ta question ?

Merci.

A +
0
seydou86 Messages postés 29 Statut Membre
 
ha je vois

bha dans ton exemple , ya ABBCCDEE dans la case A1

j'aimerais si possible avoir :

A1 B1 C1 D1 E1 F1 G1 E1
A B B C C D E E


1 lettre par cellule , au lieu de toutes les lettre dans La meme cellule .

mais si ca demande trop de boulot , fait au plus simple

merci merci
0
seydou86 Messages postés 29 Statut Membre
 
voit tu ce que je voulais dire precedemment ?
merci
0
Papou93 Messages postés 147 Statut Membre 59
 
Si j'ai bien compris, ça doit être ce que tu cherches :

Sub MaChaine()
Dim ch(5) As String
ch(1) = String(Range("a3"), "A")
ch(2) = String(Range("b3"), "B")
ch(3) = String(Range("c3"), "C")
ch(4) = String(Range("d3"), "D")
ch(5) = String(Range("e3"), "E")
For c = 1 To 5
  Cells(1, c).Value = ch(c)
Next
End Sub

N'est-ce-pas ?

Cordialement.
0
Papou93 Messages postés 147 Statut Membre 59
 
Pardon, je me suis trompé.
Voici la version définitive :

https://www.cjoint.com/?kkugSFLN3u

Cordialement.
0
seydou86 Messages postés 29 Statut Membre
 
je doit cliquer sur le bouton pour afficher les combi ?
0
Papou93 Messages postés 147 Statut Membre 59
 
Oui, et le résultat s'affiche dans les cellules A1...H1.

Cordialement.
0
sou
 
Bonjour,
<code>slt je veux faire un programme de (si sinon) pour resoudre un probleme
0