Bonjour le forum,
À l'ouverture du fichier j'ai un timer pour que le fichier se ferme automatiquement après 60 minutes (j'ai mis une minute pour les besoins de la cause). Lorsque j'appelle Workbook_BeforeClose j'ai un message m'avisant que ne le trouve pas ? Pourquoi ?
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("0:01:00"), "Workbook_BeforeClose"
End Sub
Merci
À l'ouverture du fichier j'ai un timer pour que le fichier se ferme automatiquement après 60 minutes (j'ai mis une minute pour les besoins de la cause). Lorsque j'appelle Workbook_BeforeClose j'ai un message m'avisant que ne le trouve pas ? Pourquoi ?
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("0:01:00"), "Workbook_BeforeClose"
End Sub
Merci