bonjour
petit problème bien embêtant
j'ai un module qui permet d'enregistrer un fichier toutes les 10min et un enregistrement finale à la fermeture
le problème : quand le fichier est fermé , il s'ouvre automatiquement toutes les 10min , à mon avis il manque un arrêt de l'application à la fermeture
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Public Sub test()
Debug.Print Now
Application.OnTime DateAdd("N", 1, Now), "test"
ActiveWorkbook.Save
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub
 
Private Sub Workbook_Open()
Application.OnTime DateAdd("N", 1, Now), "test"
End Sub