Mise a zero selon l'heure

[malinsard]

Bonjour à tous, tout d'abord je tiens à vous souhaiter une bonne année 2018.
Mon problème, je souhaiterai une macro qui fasse une remise à zéro d'une feuille à une heure précise pour mon cas 00:00.
Je n'arrive pas a trouve de post sur ce sujet.
Merci pour votre aide.

 

[kingfadhel]

Bonsoir,
bonne année 2018

Sub Remise_a_zero()
Application.OnTime TimeValue("00:00:00"), "ta_procédure"
end Sub

avec :
ta_procédure : la procédure qui exécute la remise à zéro

 

[malinsard]

Merci pour ta réponse mais cela ne fonctionne pas voici mon code avec une heure test.
Sub Minuit()
Application.OnTime
TimeValue ("08:22:00"), shtMainCourante.Range("A2,H2,C7:F8,A10,B16,A18:I51") = ""
shtMainCourante.Range("B16") = shtMainCourante.Range("B16").Value + 1

End Sub
8:22 étant l'heure que j'ai mis pour tester.

 

[kingfadhel]

Bonjour, le forum
@malinsard à toi,

 

[malinsard]

Merci problème résolu!