F F2T XLDnaute Occasionnel 14 Octobre 2010 #1 Bonjour, je chercherais a renseigner un nom de fichier iteratif pour une sauvegarde quoditienne automatique. Sub Save() ' ChDir "\\Gx270desktop\sauvegarde\TB" ActiveWorkbook.SaveAs Filename:= _ "\\Gx270desktop\sauvegarde\TB\TB & DATE.xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False End Sub Cependant le TB & DATE ne fonctionne pas, il m'ecrit TB & DATE. Alors que je voudrais qu'il ecrivent TB + la date du jour: ex : TB14102010 pour ajourd'hui. Est ce possible? Merci pour l'aide.
Bonjour, je chercherais a renseigner un nom de fichier iteratif pour une sauvegarde quoditienne automatique. Sub Save() ' ChDir "\\Gx270desktop\sauvegarde\TB" ActiveWorkbook.SaveAs Filename:= _ "\\Gx270desktop\sauvegarde\TB\TB & DATE.xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False End Sub Cependant le TB & DATE ne fonctionne pas, il m'ecrit TB & DATE. Alors que je voudrais qu'il ecrivent TB + la date du jour: ex : TB14102010 pour ajourd'hui. Est ce possible? Merci pour l'aide.
Pierrot93 XLDnaute Barbatruc 14 Octobre 2010 #2 Re : Sauvegarde avec Nom fichier iteratif. Bonjour, essaye ainsi : Code: ActiveWorkbook.SaveAs Filename:= _ "\\Gx270desktop\sauvegarde\TB\TB" & Format(Date, "ddmmyyyy") & ".xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False bon après midi @+ Vote positif 0 Vote négatif
Re : Sauvegarde avec Nom fichier iteratif. Bonjour, essaye ainsi : Code: ActiveWorkbook.SaveAs Filename:= _ "\\Gx270desktop\sauvegarde\TB\TB" & Format(Date, "ddmmyyyy") & ".xlsm", _ FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False bon après midi @+
F F2T XLDnaute Occasionnel 14 Octobre 2010 #3 Re : Sauvegarde avec Nom fichier iteratif. Bonjour Pierrot, merci. Vote positif 0 Vote négatif