Incrémenter seconde format hh:mm:ss

Bonjour a tous,

Voila juste une petit problème qui me rend fou :mouarf:

J'ai une cellule A3 au format hh:mm:ss heure qui a pour valeur 16:00:01
je veux en A4 avoir 16:00:02 mais en incrémentant celle en A3

J'ai ceci

Code:

---

Range("A4").Value = Range("A3").Value + 1

---

Mais sa ne change rien

Comment pourrais je faire


Merci d'avance Bastien

Bonjour

Code:

---

1 2 3

Range("A4") = Range("A3") + TimeSerial(0, 0, 1) 'ou bien Range("A4") = DateAdd("s", 1, Range("A3").Value)

---

Merci beaucoup tu me sauve encore une fois ;)

Si je peux abuser pour ma curiosité comment tu ferai la différence de A3 et A4 qui sont au format date par ex 16:00:01 et 16:00:09

et avoir un integer qui vaut 8?

Merci encore

BAstien

EDIT: En gros comment récupérer les secondes d'une soustraction de format hh:mm:ss

Regarde l'aide sur DateDiff

Merci c'est pile cela qu'il me faut, cependant petit problème encore :mouarf:

je fais:

Code:

---

Range("A1")= DateDiff ("s", Range("A2").value, Range("A3").value)

---

Mais la diff me donne 00:00:00 avec une date alors que en A2 j'ai 16:00:03 et A3 21:00:14

Je voudrai trouver le delta mais je ne vois pas pourquoi

Merci encore

Bastien

Code:

---

1 2	Range("A1").NumberFormat = "0" Range("A1") = DateDiff("s", Range("A2").Value, Range("A3").Value)

---

A merci :mouarf: je me sens bete la :roll: je tente cela lundi merci :D

En tout cas tu gère bien le vba Bravo