Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Général VBA
Général VBA Forum général VBA . Pour les logiciels spécifiques (Access, Excel, Word, ...), postez dans les bons sous forums.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/04/2007, 18h26   #1
Invité de passage
 
Inscription : avril 2007
Messages : 1
Détails du profil
Informations forums :
Inscription : avril 2007
Messages : 1
Points : 0
Points : 0
Par défaut traduction en VBA d'un algo mastermind

bonjour,

j'ai écrit un algo pour un mastermind qui fonctionne sur le papier mais pas moyen de le traduire en VBA, je dois faire une macro dans excel et je ne comprend pas pourquoi ça ne fonctionne pas... SOS...
voici l'algo en question:

variables:
il doit y avoir trois tableaux: mat[10][4] (le tableau ou s'afficheront les différentes tentatives du joueur), mat2[10][2] (où s'affichent les résultats après chaque tentative du joueur: nombre de bons chiffres bien placés et nombre de bons chiffresmalplacés) et tab[2][5] (tab étant un tableau qui n'apparait pas, il contient la combinaison de 4 chiffres choisis par l'ordinateur et que le joueur doit trouver)
i,j,y,z,val qui sont des entiers

i<=0
j<=0
y<=0
Tant que j<10 et y<4 faire
Tant que i<4 faire
écrire ("entrer un entier entre 1 et 6")
lire val
mat[i][j]<-val
i<= i+1
fin tant que
y<=0
z<=0
Tant que i<4 faire
mat2[0][j]<=y
mat2[1][j]<=z
val<=mat[i][j]
si tab=val faire
si a=i, y=y+1 (a est l'élément choisi par l'ordinateur)
sinon z=z+1
fin si
fin si
i=i+1
fin tant que
j=j+1
fin tant que
si y=4 écrire ("vous avez gagné")
sinon écrire ("vous avez perdu")

C'est difficile d'expliquer ce que j'ai fait sur un forum comme ça, surtout pour les noms des variables, d'autant plus que c'est un peu brouillon dans ma tête alors...
merci d'avance pour votre aide!
isabienne est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/04/2007, 19h37   #2
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Citation:
Envoyé par isabienne
c'est un peu brouillon dans ma tête alors
Tu as fait un bel algorithme mais il nous sera difficile de l'améliorer si tu n'es pas encore au clair avec ton projet. Paufine-le et reviens nous
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 16h04.


 
 
 
 
Partenaires

Hébergement Web