K
Kam7
Guest
Bonjour tout le monde,
Je souhaite faire une sauvegarde automatique en intégrant dans le nom du fichier le numéro de la semaine du jour de l'enregistrement automatique j'en suis à :
Sub TestNumSem()
Nomfichier = "Semaine_du_" & NO.SEMAINE(TODAY(), 2) & ".xls"
ActiveWorkbook.SaveAs Filename:="C:\Svgde\" & Nomfichier
End Sub
Mais ça ne marche pas
Quelqu'un aurait-il la solution.
Merci
Kam7
Je souhaite faire une sauvegarde automatique en intégrant dans le nom du fichier le numéro de la semaine du jour de l'enregistrement automatique j'en suis à :
Sub TestNumSem()
Nomfichier = "Semaine_du_" & NO.SEMAINE(TODAY(), 2) & ".xls"
ActiveWorkbook.SaveAs Filename:="C:\Svgde\" & Nomfichier
End Sub
Mais ça ne marche pas
Quelqu'un aurait-il la solution.
Merci
Kam7