bonjour ,
j'ai un fichier a reenregistrer tous les jours et j'essai donc que la cration du fichier soit automatique , j'ai essaye le code suivant sans succes
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Workbook_BeforeClose(Cancel As Boolean) Active.Workbook.SaveAs Filename:="C:\WINDOWS\Profiles\abcde\Desktop\" & Worksheets("SUMMARY").Range("F8") & today() & ".xls" End Sub
Partager