Cumul d'heures sous excel en VBA
Je programme un peu en VB sous excel.
J'ai un problème de cumul de temps de vol(Planeur) exprimé en heure:minutes dans une colonne excel (Format [h]:mm).
Une boucle en VB me permet de totaliser les temps de la colonne jusqu'au maximum de 24H. Au-delà mon compteur se remet à 00:00.
J'ai essayé tous les format, CDate entre autres. Je ne trouve pas la solution.
Voici la partie de code incriminée :
Code:
1 2 3 4 5 6 7 8 9 10 11
| Dat = Cells(R, 1) ' Lecture de l'année N-1
While Dat > Dat1
R = R - 1
T = CDate(T + Cells(R, 9) + Cells(R, 10))
T = Format(T, "h:m")
MsgBox ("T = " & T & " Dat = " & Dat)
Dat = Cells(R, 1)
Wend
T = Format(T, Time)
MsgBox ("T = " & T & " Dat = " & Dat) |
Merci au vigoureux internaute qui voudra m'aider.:mouarf: