Re,
Je crois que je viens de comprendre ta demande en relisant ton dernier post. En fait, je croyais que temps était un paramètre de ta procédure alors que c'est une variable !!!
Malgré tout, je ne comprends toujours pas pourquoi tu fais C = C + 1 pour remonter jusqu'à la ligne 1 (au lieu de C = C - 1)...
Enfin si j'ai bien compris, tu peux modifier ta boucle comme suit :
Do While temps < '02:00:00'
If C <1 then
MsgBox 'Durée insuffisante'
Exit Sub
End If
....
En espérant que cela réponde à ta demande :unsure:
Amicalement
Charly
Message édité par: Charly2, à: 20/11/2005 23:07