Discussion :

[PUARAI]

Bonsoir à tous,

Voila mon souci,

J'ai copier un code qui se trouver sur un bouquin excel qui permettais de creer un chronométre mais j'ais fais comme ils ont dits dans le bouquin et rien ne se passe voici le:
Bouton Point d'interrogation

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Public vChrono
Private Sub CommandButton1_Click()
MsgBox Format(Now() - vChrono, "h:mm:ss"), vbOKOnly, "Chrono"
End Sub

Bouton GO

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub CmdGO_Click()
CmdGO.Enabled = False
CmdRAZ.Enabled = False
CmdARRET.Enabled = True
Do
    vChrono = Now() - [B2]
    DoEvents
Loop
End Sub

Bouton ARRET

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub CmdARRET_Click()
CmdGO.Enabled = False
CmdRAZ.Enabled = True
CmdARRET.Enabled = False
vChrono = [B2]
End
End Sub

Bouton RAZ

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub CmdRAZ_Click()
CmdGO.Enabled = True
CmdRAZ.Enabled = False
CmdARRET.Enabled = False
[B2] = 0
End Sub

Donc voila si quelqu'un aurait une idée

Merci d'avance

A +++