Réponse pour convertir en heures minutes et secondes

Sub test()
   t0 = 4030
   s = t0 Mod 60
   t = (t0 - s) / 60
   m = t Mod 60
   h = (t - m) / 60
   MsgBox (t0 & "s = " & h & "h " & m & "mn " & s & "s")
End Sub

Discussions similaires