Je voudrais ajouter un compteur sur mon fichier Excel.
celui-ci démarrerait après avoir renseigné une cellule ou via un bouton.
Passé un certain temps (ex 15mn), je voudrais que le fichier s'enregistre et se ferme.
je pense que tout se fait via VBA mais la je ne maitrise pas.
Alors je voudrais que quand j'appuis sur le bouton un compteur décrémente (de 15mn à 0) en cellule N3.
Une fois à 0, un message s'affiche en disant que le fichier va se fermer.
Que le fichier s'enregistre et se ferme.
pour une simple attente, la cellule déclinante étant formatée en mm:ss, macro associée au bouton :
Code:
Sub oups()
[N3] = "15:00" 'choix de la durée
Do
Application.Wait (Now + TimeValue("00:00:01"))
[N3] = [N3] - CDate("00:01")
Loop Until [N3] = 0
MsgBox "le classeur va se fermer !", 16, "Attention..."
ThisWorkbook.Save
ThisWorkbook.Close
End Sub