Timeout sous vba excel (fermeture automatique de l'application)

Soyez le premier à donner votre avis sur cette source.

Vue 10 324 fois - Téléchargée 1 717 fois

Description

Travaillant sur des fichiers Excel multiples et partagés dans le cadre de mon travail, il m'es souvent arrivé d'être coincé par des utilisateurs qui ne ferment pas un classeur Excel et se barrent en verrouillant leur poste de travail. Le fichier est ensuite bloqué en lecture seule. Ce code permet de lancer un timer qui, en cas d'absence de l'utilisateur ferme le classeur Excel après 5mn d'inactivité.
Un Userform s'affiche 20 secondes avant la fermeture pour informer l'utilisateur que l'appli va se fermer, tout mouvement de la souris ou pression sur le clavier relance alors le timer pour 5mn.

Source / Exemple :


Vous retrouverez dans le Zip un classeurs Excel : TimeOut_09_2.xls qui est la version commentée et animée de la Macro.
Vous trouverez ensuite le fichier Time_Out.bas qui est la version finale à importer dans le classeur de votre choix.
Le Userform.frm / .frx, à importer également, c'est le compte à rebour final.
Le ThisWorkbook.cls est un fichier exemple des commandes à utiliser pour utiliser le Timer dans votre propre classeur Excel.
De toute façon, le classeur Excel est commenté et vous donnera toutes les infos nécessaires.
Le classeur utilise la commande OnTime de VBA.

Conclusion :


Avec ce code, je suis maintenant tranquille lorsque mes collaborateurs sortent et laissent leurs applications ouvertes. Elles se ferment toutes seules !!!

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_eren
Messages postés
38
Date d'inscription
vendredi 3 janvier 2003
Statut
Membre
Dernière intervention
27 novembre 2008
-
Bonjour,
Ce code est très intéressant mais je ne comprends pas tout au sujet de la Function GetLastInputInfo même si ton programme fonctionne parfaitement.

Comme j'aime bien comprendre, j'ai cherché des infos sur sa mise en oeuvre mais je n'ai rien trouver de probant.
As-tu des liens concernant cette fonction ?

A+
Eric
GTI38
Messages postés
15
Date d'inscription
jeudi 14 octobre 2004
Statut
Membre
Dernière intervention
11 avril 2013
-
La source est ici :
http://www.vbfrance.com/codes/TESTER-PRESENCE-UTILISATEUR-ISINPUTIDLE_34319.aspx

je n'ai fait que récupérer un code déjà existant. (Merci à l'auteur !!)
La commande détecte l'activité clavier & souris.
sassien77
Messages postés
1
Date d'inscription
mercredi 10 février 2010
Statut
Membre
Dernière intervention
10 mars 2010
-
Bonjour,

Pouvez vous me dire ou mettre tous ces code dans Microsoft virtual basic (dans quelles cases) pour que le programme fonctionne ? Merci d'avance.
rchausse
Messages postés
1
Date d'inscription
jeudi 1 janvier 2009
Statut
Membre
Dernière intervention
8 juillet 2010
-
Bonjour

Je voulais savoir si il est possible de modifier le script pour que la détection de mouvement soit uniquement sur le fichier dans lequel se trouve le script. En effet je viens de m'apercevoir que si je travail sur un autre classeur excel, le 1er fichier ne se ferme pas.

Merci d'avance

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.