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

Soyez le premier à donner votre avis sur cette source.

Vue 10 155 fois - Téléchargée 1 696 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

Commenter la réponse de cs_eren

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.