Bloquage avec une macro Timer

[bulitte]

Bonjour à tous, j'ai besion de vos compètances pour résoudre mon bug. J'aimerai mettre un Timer pour activer une macro qui met à jour des données DDE, voilà ce que j'ai mis dans ma macro.

Dim heure As Double
Dim Intervalle As Integer
Sub ExecutionTimer()

Intervalle = 1200 'duree exprimée en secondes=20mn
'code à executer à la fin de chaque intervalle
heure = Now + TimeSerial(0, 0, Intervalle)
Application.onTimer heure, "Puissance_raffineurs_essai.xls!Module3.extraction"
End Sub

Mais elle bloque à Appliction.onTimer heure. Je ne sais pas si le problème vient de l'adresse où se trouve la macro qui s'appelle "extraction". J'ai tout essayé jusqu'à l'adresse complète, mais rien ni fait!
La macro ci-dessous me permet de l'arrêter, est-elle correcte?
Merci d'avance pour votre aide, je suis largué!

voilà la macro pour l'arrêter

Sub ArrêtTimer()
On Error Resume Next
Application.onTimer heure, "ExecutionTimer", , False
End Sub

 

[Cousinhub]

Re : Bloquage avec une macro Timer

Bonjour

Application.onTimer

ou

Application.OnTime

 

[bulitte]

Re : Bloquage avec une macro Timer

Bonjour bhbh,
Oups!! j'ai honte, je me suis mélangé les pinceaux avec le nom de ma macro et la commande, elle fonctionne mieux maintenant. Merci pour tout et bonne journée à toi