Recherche:

Essaie ça:


Me![Temps Total] = CDate(Nz(Me![Temps Total], 0#)) + (FormatHMS(elapsedtime))

Avec la fonction :


Public Function FormatHMS(d As String) As Date
Dim t As Variant

Et tu ne peux pas modifier la fonction qui met à jour elapsedtime, pour qu'elle respecte le format "hh:mm:ss" ?

Tu peux donner en exemple une série de valeurs pour elapsedtime avec à la fin la valeur qui coince:

Je soupçonne que le format est du style "24:00:01" :?

Re,

Et quand tu mets:


Me![Temps Total] = CDate(Nz(Me![Temps Total], 0#)) + CDate(elapsedtime)

ça te donne quoi ?

Salut,

Ce n'est pas clair:

J'espère que ce code pourra t'éclairer:


Dim Etat As Boolean
Dim d As Double

Bonjour,

De quel type est la variable elapsedtime ?

De quel Type est le champ relié à la zone de texte [temps total] ?

Sous quelle forme souhaites-tu sauvegarder la valeur ?

A+