naidir
Messages postés2Date d'inscriptionmardi 12 septembre 2006StatutMembreDernière intervention12 septembre 2006 12 sept. 2006 à 15:24
Merci beaucoup de ton aide,
En faite
Ce que j'aimerais c'est que la boucle lorsqu'elle arrive à la case "1" execute le reste du script, puis reviennent et execute la case 2 puis la case 3
Actuellement je doit rentrer dans la boite de dialogue 1 ou 2 ou 3
Merci
choix = InputBox("Type conso ? (Maman=1, peu import=2, rigolos=3) ", "Choix", 1)
Select Case choix
Case 1
colonne = 34
type_conso = "Maman"
Case 2
colonne = 35
type_conso = "peu import"
Case 3
colonne = 36
type_conso = "rigolos"
Molenn
Messages postés797Date d'inscriptionmardi 7 juin 2005StatutMembreDernière intervention23 février 20117 12 sept. 2006 à 15:44
Et bien, c'est exactement ce que fait le code de jrivet (sauf qu'il a mis le code ASII pour représenter tes lettres, puisque tu disais AA, BB, ...)
Pour effectuer les 3 choix dans ta boucle, tu peux faire :
For i = 34 to 36
colonne = i
Select Case i
Case 34
type_conso = "Maman"
Case 35
type_conso = "peu import"
Case 36
type_conso = "rigolos"
End Select
Next i
Le pb avec ton bout de code (je suppose qu'il y a autre chose, sinon, ça n'a aucun intérêt en fait), tu ne vois pas que tes variables colonne et type_conso sont passées par les 3 valeurs. Ca te ressortira forcément :
colonne = 36
type_conso = "rigolos"
Normal, ta boucle alimente systématiquement les 2 mêmes variables