Cumul heure 24h => 00:00:00, 48h => 24:00:00

bidounet84 -  
bidounet84 Messages postés 476 Statut Membre -
Bonjour,

Dans la formule ci-dessous je fais un cumul d'heure.
Le résultat me pose un souci à chaque fois que l'on tombe sur un multiple de 24h.
Quand je tombe sur 24h il affiche 00:00:00 puis il enchaine bien 25:00:00, 26:00:00...
Puis idem à 48h, 72h...

Comment gérer cela ?

Dim ligne_BDD As Integer
Dim heure As Date

nb_ligne_BDD = BDD.UsedRange.Rows.Count

For ligne_BDD = 3 To nb_ligne_BDD
heure = heure + BDD.Cells(ligne_BDD, 4)
BDD.Cells(ligne_BDD, 18).Value = heure
End If
Next


2 réponses

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     
    bonsoir, je pense que le problème n'est pas dans le code, il est dans le format d'affichage de la cellule.
    cependant: que contiennent les cellules BDD.Cells(ligne_BDD, 4) ?
    0
  2. bidounet84
     
    Des informations de ce type :
    03:00:00
    00:20:00
    ...
    0
    1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588
       
      peux-tu partager ton fichier?
      0
    2. bidounet84 Messages postés 476 Statut Membre 88
       
      Où je peux te le donner en privé
      0