[VBA-E] Comment annuler un appel planifié avec Application.OnTime ?

Bonjour,

J'ai un programme en VBA-Excel qui scrute une base de données toutes les 5 minutes.

L'appel de la routine qui scrute la BdD se fait grâce à un code du genre :

Code:

---

1 2 3 4 5

Public TimeScan As Variant ... TimeScan = Now + TimeValue(strTempsScan) Application.OnTime TimeScan, "ModuleGeneral.VerifMAJ" ...

---

Mon problème, c'est que si je ferme mon classeur avec la macro, sans fermer Excel, Excel réouvre le classeur au bout de quelques minutes pour aller éxécuter ce VerifMAJ 8O

J'ai essayer de supprimer l'appel à la fermeture du classeur, en suivant l'exemple donné par l'aide en ligne :

Code:

---

1 2 3 4 5 6 7

Private Sub Workbook_BeforeClose(Cancel As Boolean) ... If ModuleGeneral.FlagScanAuto = True Then Application.OnTime ModuleGeneral.TimeScan, "ModuleGeneral.VerifMAJ", , False End If ... End Sub

---

Mais ça ne marche pas :( !

Quelqu'un sait-il comment je dois m'y prendre ?

Comme je ne connaissais pas FlagScanAuto , j'ai toujours fait ça avec un boolean déclaré en public qui conditionne Application.OnTime, ainsi je peux le passer à false là où j'en ai besoin

Juste une idée, je file voir ce que j'ai à FlagScanAuto

A+

Edit
J'ai pas (vba97)

En fait, je fais comme toi, FlagAutoScan est un boolean que j'ai déclaré moi-même et qui me sert à savoir si la scrutation automatique toutes les 5 minutes est activée.