Discussion :

[yassinefeki]

Salut mes amis,

je suis débutant en VBA sous Excel. Je veux connaitre comment changer l'heure de début d'une date en utilisant VBA sous Excel :
par exemple 23/4/2010 10:23:11 ----> 23/4/2010 08:00:00
Est ce que c'est possible ??

Merci d'avance

[AlainTech]

Bonjour,

Si la date est en "A1", résultat en "B1":

Code :

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

Range("B1") = Int(Range("A1")) + CDate("08:00:00")

[babaothe]

salut

ou encore :

Code :

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

1
2
3
4
Dim dateheureavant As Date, dateheureapres As Date
dateheureavant = "23/4/2010 10:23:11"
dateheureapres = DateValue(dateheureavant) & " 08:00"
MsgBox dateheureapres

ou encore :

Code :

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

1
2
3
Dim dateheureavant As Date
dateheureavant = "23/4/2010 10:23:11"
MsgBox DateAdd("h", 8, DateValue(dateheureavant))

et ainsi à l'infini et de différentes manières.

[sabzzz]

bonjour yassinefeki,

il serait plus facile de te répondre si tu nous disais en quoi les réponses données sur le fil en date de 09/05/2010, 17h43 non pas satisfait à ta demande.