Bonjour Maxime, bonjour le forum,
Ce petit bout de code t'empêchera de taper tout autre caractère que {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}, le point sera remplacé automatiquement par une virgule :
Private Sub chrono_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 46 Or KeyAscii = 44 Then KeyAscii = 44: Exit Sub
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 8
End Sub
à la fin quand tu valides tu peux écrire sans bug :
If Me.chrono.Value = "" Then Me.TextBox1.Value = 0
Me.chrono.Value = CDbl(Me.TextBox1.Value)