Salut christophe,
Un début de code si on a un bouton valider
Sub commandbutton1_click()
Dim h1, h2 As Long
Dim str1, str2 As String
ga1 = Left(CStr(textbox1.Value), 2) 'recupere l'heure
dr1 = Right(CStr(textbox1.Value), 2) ' recupere les min
h1 = CLng(ga1) 'On transforme en long les heures et les minutes
m1 = CLng(dr1)
ga2 = Left(CStr(textbox2.Value), 2) 'recupere l'heure
dr2 = Right(CStr(textbox2.Value), 2) ' recupere les min
h2 = CLng(ga2) 'On transforme en long les heures et les minutes
m2 = CLng(dr2)
''code pour retrancher des heures et des minutes ....
End Sub