Bonjour,

Est-ce que quelqu'un pourrait expliquer pourquoi le code...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Dim DateOutput as Date
DateOutput = #2/4/2013 11:56:00 PM#
For iRow = 1 to 10
Worksheets(1).Cells(iRow,1) = DateOutput
DateOutput = DateAdd("n", 2, DateOutput) 'incrémente la date de 2 minutes
Next iRow
... ne donne pas le résultat:
04.02.2013 23:56
04.02.2013 23:58
05.02.2013 00:00
05.02.2013 00:02
05.02.2013 00:04
05.02.2013 00:06
05.02.2013 00:08
05.02.2013 00:10
05.02.2013 00:12
05.02.2013 00:14

... mais donne le résultat:
04.02.2013 23:56
04.02.2013 23:58
04.02.2013 00:00
05.02.2013 00:02
05.02.2013 00:04
05.02.2013 00:06
05.02.2013 00:08
05.02.2013 00:10
05.02.2013 00:12
05.02.2013 00:14

En exécutant le code étape par étape, la valeur DateOutput dans la fenêtre "Variables locales" de VBA indique pourtant la date du 5/2/13 à la 3ème itération, et c'est celle du 4/2/13 qui est inscrite sur la feuille Excel...

Merci pour votre aide!