Discussion :

[txufo]

Bonjour,
j'ai le problème suivant : je lance périodiquement sur une durée déterminée une macro, pour faire un outil qui tourne "en continu" et en temps réel. Je voudrais savoir s'il est possible d'annuler les lancements futurs (en attente), par exemple si la macro est lancée par erreur ou si on doit modifier des données.
Merci d'avance

Ci - joint mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
' ----------------------------
 
dep = TimeSerial(Hour(Now), Minute(Now), Second(Now))
Call permanentCheck
 
reloop:
    If compteur <= nbTics Then 'nb de fois ou je lance la macro
        dep = DateAdd("s", deltaS, dep)
        Application.OnTime TimeValue(dep), "permanentCheck"
        compteur = compteur + 1
 
        GoTo reloop
    End If
 
' ----------------------------

Merci bcp de votre aide

[ouskel'n'or]

Tu vas pas mettre ça ? Ne jamais utiliser de goto pour réaliser / ou dans / une boucle. Tu vas tout planter. Peut saturer la pile et plater l'appli et je parle d'Excel, voire pire.
Dis-nous en plus :
Comment s'appelle la macro qui compte ?
permanentCheck, c'est quoi ?
Que veux-tu faire ? Ajouter des semaines mais encore ?
A+