Select Case en VBA : question de débutant

Select Case en VBA : question de débutant - VB/VBA/VBS - Programmation

Marsh Posté le 04-12-2011 à 14:45:43    

Bonjour, j'ai un devoir à rendre pour demain. La consigne est de corriger un programme fait sous VBA et le résultat attendu est l'affichage du montant total de plusieurs produits ainsi que l'affichage de chaque montant des produits. Je travaille sous OpenOffice Basic, car je n'ai pas Excel. Il y a plusieurs couleurs, je pensais que le rouge signifait que la "phrase "était fausse, mais ce n'est pas ça. J'aimerais savoir quel est le code de couleur concernant les macros. Mon autre problème, c'est que le Select Case est fait comme suit(je donne un autre, mais fait dans les mêmes conditions :  
 
 
 
 
For i= 1 to variable
 
variable1=InputBox("Veuillez choisir : (1 2 3 ou 4, "magasin inconnu" )
 
Select Case variable1
Case 1: tarif="4"
Case 2: tarif="6"
Case 3 tarif="12"
Case 4 tarif="24"
 
End Select  
 
MsgBox("le total est de "total)
 
End Sub
 
 
Merci infiniment pour votre aide, car je ne saisis pas du tout où est le problème...Note : j'ai fait exprès de ne pas afficher le programme entier, notamment les déclarations (Dim), et les InputBox au tout début. Mais je peux vous l'afficher si vous le souhaitez. Ne pensez pas que je n'ai rien fait ce n'est pas le cas : j'ai corrigé les parenthèses puis j'ai essayé de mettre les Else et If au milieu du Select, mais comme ça ne fonctionne pas, je ne comprends pas ce qu'il faut que j'utilise ou s'il y a une erreur quelque part...

Reply

Marsh Posté le 04-12-2011 à 14:45:43   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed