Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

timer en boucle

2 réponses
Avatar
sleg
Bonjour,


j'aimerais savoir comment faire pour lancer une Macro toutes les x
heures avec application.ontime now + ...........................

Merci d'avance

2 réponses

Avatar
JB
Bonjour,


http://boisgontierjacques.free.fr/pages_site/evenements.htm#OnTime

Dim temps
Sub majHeure()
ThisWorkbook.Sheets("feuil1").[A1] = Now
temps = Now + TimeValue("00:01:00")
Application.OnTime temps, "majHeure"
End Sub

Sub auto_open()
majHeure
End Sub

Sub auto_close()
On Error Resume Next
Application.OnTime temps, Procedure:="majHeure", Schedule:úlse
End Sub


JB
http://boisgontierjacques.free.fr



On 8 nov, 15:59, sleg wrote:
Bonjour,

j'aimerais savoir comment faire pour lancer une Macro toutes les x
heures avec application.ontime now + ...........................

Merci d'avance


Avatar
sleg
On 8 nov, 16:03, JB wrote:
Bonjour,

http://boisgontierjacques.free.fr/pages_site/evenements.htm#OnTime

Dim temps
Sub majHeure()
ThisWorkbook.Sheets("feuil1").[A1] = Now
temps = Now + TimeValue("00:01:00")
Application.OnTime temps, "majHeure"
End Sub

Sub auto_open()
majHeure
End Sub

Sub auto_close()
On Error Resume Next
Application.OnTime temps, Procedure:="majHeure", Schedule:úlse
End Sub

JBhttp://boisgontierjacques.free.fr

On 8 nov, 15:59, sleg wrote:



Bonjour,

j'aimerais savoir comment faire pour lancer une Macro toutes les x
heures avec application.ontime now + ...........................

Merci d'avance- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -


Merci pour ton aide et ton lien je vais regarder cela

grand merci