Lancement auto d'une macro

[Xxaann]

Bonjour,

Je voudrais lancer une macro automatiquement lorsque le fichier excel n'a pas été modifié durant un certain temps. Mais je n'ai rien trouvé sur le net.
Pouvez-vous m'aider?

Merci

 

[kjin]

Re : Lancement auto d'une macro

Bonsoir,
Quelques précisions seraient bienvenues
A+
kjin

 

[Xxaann]

Re : Lancement auto d'une macro

En fait, je voudrait faire des remises à zéro de données lorsque l'utilisateur n'utilise plus le fichier (mais qui reste pourtant ouvert) durant une heure par exemple.

Voici un code que j'ai mis mais gros problème, il lance la macro1 tjs après une heure. Moi, je voudrais y insérer la contrainte: si pas de modification du fichier durant une heure, alors lancer la macro1

Sub Rafraichissement()

DansTrenteSecondes = TimeSerial(Hour(Time) + 1, Minute(Time), Second(Time) )

Application.OnTime DansTrenteSecondes, "Rafraichissement"

Call Macro1
End Sub

 

[vbacrumble]

Re : Lancement auto d'une macro

Bonsoir

Pourquoi ne pas fermer directement le fichier (en l'enregistrant au préalable)
au bout de 15 minutes par exemple ?

 

[Xxaann]

Re : Lancement auto d'une macro

C'est un fichier utilisisé par des opérateurs de production toujours activité(pour de la consultation) mais réellement utilisé 3, 4 fois par jour pour de la prise de décision en y insérant des données de produvtion.

Je sais, ma question reste tordue... 😛

 

[kjin]

Re : Lancement auto d'une macro

Bonsoir,
Le Timer démarre à l'ouverture du classeur
Toute modif dans une feuille réinitialise le Timer puis le relance
Une fois le temps écoulé, actives ta macro (à la place du message), le timer s'arrête, à toi de voir s'il faut ensuite le relancer ou non.
Non testé donc sans garantie
A+
kjin

 

[Xxaann]

Re : Lancement auto d'une macro

Merci Kjin,
C'est tip top ce qu'il me fallait.
Encore merci pour ta précieuse aide.
A+🙂🙂🙂