Discussion :

[mike11]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[fred65200]

bonsoir,


je t'ai ajouté les balises code, ce n'est pas facultatif.
Pour cela il suffit d'utiliser le bouton juste au dessus de la zone de saisie des messages. et ensuite :



tu peux essayer le format

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 "[hh]:mm:ss"

Cordialement