timer en vba

[Julien]

Bonjour a tous

J ai un petit timer en vba avec application.ontime
Sa fonction de timer est bien executee mais le probleme que j ai, c est pour l arreter, chaque fois vba me retourne erreur dans la definition de Ontime de application et ce meme avec le parametre schedule:= false et avec la valeur du prochain lancement dans une variable.

Si quelqu un pouvait m aider ce serait tres sympa merci d avance.

Julien

 

[Dan]

Bonsoir Julien,

Peux-tu nous montrer le code que tu utilises pour l'instant ?

sinon essaie ceci :

Sub ArretTimer()
On Error Resume Next
Application.OnTime Lheure, "nom de ta macro pour le timer", , False
End Sub

Bon travail

@+

Dan

 

[Julien]

salut Dan, le forum:

voici ce que je fais actuellement:

Dim StartTime As Date
Private Class As EventClass
Private TimerValue As String

Sub RunLogTimer(Delay As String, Obj As EventClass)
Set Class = Obj
TimerValue = Delay
StartTime = Now + TimeValue(TimerValue)
Application.OnTime earliesttime:=StartTime, _
procedure:="ExecuteLogTimer"
End Sub

Sub StopLogTimer()
Application.OnTime earliesttime:=StartTime, _
procedure:="ExecuteLogTimer", _
schedule:=False
End Sub

Sub ExecuteLogTimer()
Call Class.Timer
StartTime = Now + TimeValue(TimerValue)
Application.OnTime earliesttime:=StartTime, _
procedure:="ExecuteLogTimer"
End Sub



Avant j avaix mis le On error resume next mais parfois cela n arretait pas le timer alors je cherche la maniere correcte de le faire (si elle existe, et si ce n est pas avec le resume next).

Merci Dan d avoir repondu, si tu as des autres tuyaux j suis preneurs

Julien

 

[Dan]

Bonjour Julien,

Ta macro semble bien construite à première vue. Toutefois l'instruction "On error resume next" est nécessaire et doit être placée comme ci-dessous.

Sub StopLogTimer()
On error resume next
Application.OnTime "ExecuteLogTimer", , False
End Sub

@+

Dan

 

[Julien]

Salut Dan

Pour le On error resume next je l avais essaye mais comme je t'ai dit les evenements conituaient de venir, et moi j en voulais plus de ces evenements.

Alors j ai chercher plus et j ai demande d autres manieres de timers et voila ce que j ai trouve, le second(avec le while et le timer), est le meilleur.

J te les laisse au cas tu en ai besoin un jour, on sait jamais.

@+,
et encore merci

Julien