Sauvegarde automatique

pat redoue Messages postés 11 Statut Membre -  
 ddez -
Bonjour,

j'essai de faire une sauvegarde automatise des que je ferme mon fichier sans que excell ne me le demande voila ce que j'ai tente sans succes..

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Active.Workbook.SaveAs Filename:="C:\WINDOWS\Profiles\GA2SACl\Desktop\" & Worksheets("SUMMARY").Range("F8") & today() & ".xls"

End Sub

quelqu'un serait resoudre ce probleme?

1 réponse

ddez
 
Salut

essaie ce code :
Private Sub Workbook_BeforeClose(Cancel As Boolean)

    Application.DisplayAlerts = False
    ThisWorkbook.Save

End Sub
0