Différence en "heure" entre 4 textboxs

[BOCARAMEL]

Bonjour a tous 🙂

J'aimerai sur mon userform quand je clique sur suivant
qu'il me calcule directement dans la cellule "A1" la différence en heure
et passe a l'onglet 2 de mon multipage

exemple:
date de départ "tb9" : 10/10/10
heure de départ "tb11" : 8:00
date de retour "tb10" : 11/10/10
heure de retour "tb14" : 9:00

total : "25:00"

j'ai essayer ça

If CDec(CDate(TextBox10)) + CDec(CDate(TextBox14)) < CDec(CDate(TextBox9)) + CDec(CDate(TextBox11)) Then
MsgBox "Le départ est antérieure à l'arrivée"
Exit Sub
Else
Sheets("feuil1").Range("a1").Value = CDec(CDate(TextBox10)) + CDec(CDate(TextBox14)) - CDec(CDate(TextBox9)) + CDec(CDate(TextBox11))
 MultiPage2.Value = 1
  End If

Merci de votre aide et bon week end a tous 🙂
bocaramel

 

[pierrejean]

Re : Différence en "heure" entre 4 textboxs

bonjour bocaramel

Vois si cela va mieux

 

[BOCARAMEL]

Re : Différence en "heure" entre 4 textboxs

Bonjour PierreJean 🙂

super génial
vraiment merci pour ton aide
cela fonctionne comme je veux

@+ sur Excel Downloads

et bon week end

PS : a chaque fois ton aide m'apporte la solution
je vais finir par mettre ton nom a la fin de mon classeur 😉

 

[Bebere]

Re : Différence en "heure" entre 4 textboxs

bonjour Bocaramel,Pierrejean
presque écrit bolcaramel(à partager,bien sûr)
une autre solution? que mon ami PierreJean
aller je regarde
à bientôt

 

[BOCARAMEL]

Re : Différence en "heure" entre 4 textboxs

bonjour Bebere

Presque aussi bien que PierreJean 😀

sur ton classeur si on rentre
du 10/10/10 a 8:00
au 10/10/10 a 9:00

ça marque 00:00:00 donc PAS bon
la réponse est 01:00

pas d'alerte non plus si le retour est inferieur au départ

bonne journée
bocaramel

 

[Bebere]

Re : Différence en "heure" entre 4 textboxs

dans le code du bouton tu changes

If TextBox10 > TextBox9 Then
par
If TextBox10 > TextBox9 Or TextBox10 = TextBox9 Then

à bientôt