Programme VBA incomplet

Bonjour ,

J’ai un exercice qui nous demande de compléter un algo vba , sans indication à quoi il sert , j’ai essayer de le taper sur vba mais il y a un message d’erreur qui dit qu’une constante est requise.

Sub exo1 ()

Dim t(1 To n) as integer

Dim i as integer

For i=1 to n

t(i) = inputbox (« saisie une note »)

Next

For i = n to 1

Msgbox(t(i))

Next

End sub

Avez vous une idée ?

il manque la valeur de n

et à mon avis

For i = n to n 
Msgbox(t(i))
Next 

devrait être

For i = 1 to n 
Msgbox(t(i))
Next 

J’ai mis Const n = 3 (exemple) , ça ne marche toujours pas

Et oui c’est moi qui me suit trompé c’est i=n to 1

Merci pour tes réponses

ThecupyearsG a écrit :

c’est i=n to 1

step - 1

c'est le métier qui rentre !

voici le corrigé

Sub exo1()
Const n = 3
Dim t(1 To n) As Integer
Dim i As Integer

For i = 1 To n
    t(i) = InputBox("saisie une note")
Next

For i = n To 1 Step -1
    MsgBox (t(i))
Next

End Sub

C’est bon , merci beaucoup Steelson !!!

et n'oublie pas de voter sur le petit coeur si le coeur t'en dis !!

allez, au prochain numéro ...