Re : compte à rebours
Bonjour,
Application.OnTime (Now + TimeValue("00:00:05")), "ExecutionTimer"
dans ton exemple, tu déclenche un "Chrono" à l'ouverture de ton excel
Pour repérer l'activité d'excel, il n'y a pas d’évènement générique tu devra travailler avec :
le changement d'onglet
Private Sub Worksheet_Activate()
Travail=Timer
End Sub
le changement de cellule
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Travail=Timer
End Sub
dans ""ExecutionTimer" tu peux détecter le temps d'inactivité si (Timer -Travail) > délai ==>
sinon réinitialiser (Travail=Timer) et relancer le timer