auto logout - VB/VBA/VBS - Programmation
Marsh Posté le 13-07-2005 à 22:33:57
exemple d'un timer (en sec) 
 
------ 
Public Secu As String 
Sub temps() 
 
Dim Deb 
Dim Cc As Integer 
 
UserForm1.Show 
 
Cc = 10 
 
For i = 1 To 10 
 
Deb = timer 
 
Do While timer < Deb + 1 
DoEvents 
Label2.Caption = Cc  'NomUserform.NomLabel.caption = cc pour avoir le compteur dans une fenêtre 
Loop 
 
Cc = (Cc - 1) 
 
Next 
 
 
UserForm1.Hide 
 
 
 
End Sub 
---------- 
 
fonction pour fermer l'appli 
 
Windows.Application.Quit 
 
pour les changements, je ne sais pas.
Marsh Posté le 13-07-2005 à 17:32:16
Bonjour
quelqu'un peut il me transmettre une macro pouvant faire un autologout sur un fichier excel. Nous sommes plusieurs utilisateurs du meme fichier excel et souvent les gens oublient de fermer ledit fichier.
Je souhaiterais une macro qui enregistre et ferme automatiquement le fichier dès lors qu'aucune "modification" n'a pas été effectuée depuis plus de x temps.
d'avance merci.