Ca marche aussi directemetn dans un formulaire que j´ai créé à cet effet.
Bdd vierge de toute table, req, état.
Un module de code avec les variables globales.
Un formulaire avec un bouton et le code suivant, ça marche:
Private Sub Commande1_Click()
nbcourse = 1
nbvague(1) = 1
Spinner = 1
For L = 1 To nbcourse
For N = 1 To nbvague(L)
course(Spinner, 1) = L ´ c´est là qu´il y a problème
course(Spinner, 2) = N
Msg = " Entrer le DECALAGE DE TEMPS ( en seconde) "
Title = " DECALAGE DE TEMPS"
course(Spinner, 5) = InputBox(Msg, Title)
If course(Spinner, 5) = " " Then
MsgBox ( "décalage = 0 pour vague " & N & " de la course " & L)
course(Spinner, 5) = 0
End If
Spinner = Spinner + 1
Next N
Next L
End Sub