auto logout

auto logout - VB/VBA/VBS - Programmation

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.

Reply

Marsh Posté le 13-07-2005 à 17:32:16   

Reply

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.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed