Je me bats depuis quelques temps déjà avec un problème, pourtant déjà maintes fois évoqué dans les forums et je ne trouve pas de solution à mon problème.
J'ai une base de données avec des horaires de travail sur le format "39:00:00" et quand les données sont intégrées dans l'userform, cela donne des nombre décimaux (exemple : "1,625" pour "39:00:00").
J'ai essayé de modifier le format selon ce que dit Excel : "[h]:mm:ss, de multiplier par 24, de me mettre en format texte ...
Private Sub Txt14_Change()
Dim Jours As Double
If InStr(Txt14.Text, ":") = 0 Then
Jours = CDbl(Txt14.Text)
Txt14.Text = WorksheetFunction.Text(Jours, "[h]:mm:ss")
End If
End Sub