Question sur l'execution automatique d'une macro

Bonjour

Une petite question ; lorsque je programme l’exécution d'une macro tout les jours à une heure fixée via l'application "Ontime"

faut il que mon classeur soit systématiquement fermé puis ré ouvert pour que la macro s’exécute , car j'ai cru comprendre que si mon

classeur reste ouvert apres l'execution automatique de la tache que celle ci ne se ferait qu'une seule fois et pas les fois suivantes à l'heure déterminée ?

en bref faut il systematiquement fermer et reouvrir mon classeur pour que la tache n soit prise en compte lorsque la tache n-1 a été effectuée ?

Merci pour vos lumières

Salut le forum

Pas besoin de le relancer

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

Mytå

Merci pour cette réponse rapide , je vais m'y pencher !!


donc si j'ai bien compris

dans thisworbook on place :

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

dans un module on place

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

?

Merci

oups je me reprend

dans this workbook

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

dans un module :

    Sub TimerQuotidien

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

Merci à toi

Merci en tout cas pour cette réponse , elle est certes , très astucieuse !

Bonsoir

en reference à la réponse de Myta , j'essaie de comprendre l'instruction suivante ,

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

est ce que cela signifie que si l'heure est superieure à l'heure programmée à travers l'application Ontime alors

l'envenement "Application.OnTime" sera réamorcé à la date du jour +1 journée à 7h00 ce qui lancera la macro ?

pas trop sur d'avoir exactement bien compris ,

Merci à tout intervenant pour m'eclairer

Rechercher des sujets similaires à "question execution automatique macro"