Execution d'une tache programmée

Bonjour

je me pose une toute petite question sur le bout de code suivant :

Private Sub Workbook_Open()
   Application.OnTime TimeValue("07:00:00"), "TimerQuotidien"
End Sub
Sub TimerQuotidien
'ton code de traitement
        If Time > TimeValue("07:00:00") Then
                Application.OnTime Date + 1 + TimeValue("07:00:00"), "TimerQuotidien"
        endif
End Sub

dois je placer tout l'ensemble du code dans thisworkbook ou alors mettre dans thisworkbook

la partie suivante :

Private Sub Workbook_Open()
   Application.OnTime TimeValue("07:00:00"), "TimerQuotidien"
End Sub

et dans un module de mon classeur cette partie ?:

Sub TimerQuotidien
' traitement
        If Time > TimeValue("07:00:00") Then
                Application.OnTime Date + 1 + TimeValue("07:00:00"), "TimerQuotidien"
        endif
End Sub

Merci pour votre réponse

Bonjour

Solution 2

Cordialement

Bonjour à tous,

Bonjour rocket4,

Je pense que les deux solutions fonctionnent, mais pour ma part, je pencherais pour la seconde. Non sans omettre de te conseiller également d'écrire, sous forme de commentaires, le nom du module où se trouvera la procédure "TimerQuotidien". C'est toujours utile, surtout si tu as beaucoup de modules.

Bonne année 2013.

Cordialement.

PS : bonjour Amadéus, bonne année à toi aussi.

Merci pour vos réponses , meilloeurs voeux à vous