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

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