XL 2013 MAcro pour sauvegarder avec 1.macro enabled et 2.date

bool2gom

XLDnaute Junior
Bonjour

Je travaille sur un fichier csv compatible Excel 2003 uniquement

J'aurais besoin d'une macro pour
1.spécifier le nom du fichier voulu
2.insérer la date en aaaa/mm/jj
3.sauvegarder en ".xlsm"
4.choisir le dossier de destination

Je trouve plein de macros sur le net mais aucune avec ces 4 critères

Any idea ?

Merci
 

OOLIVE

XLDnaute Occasionnel
Re : MAcro pour sauvegarder avec 1.macro enabled et 2.date

Bonjour,

essaie avec un truc de ce style


Sub Test

Application.DisplayAlerts = False
cheminfinal = "Tu indiques le chemin où enregistrer le fichier"
fichierfinal = "Nom spécifique" & Format(Now(), "yyy-mm-dd") & ".xlsm"
ActiveWorkbook.SaveAs cheminfinal & fichierfinal, FileFormat:=xlsm, CreateBackup:=True, local:=True
ActiveWorkbook.Close

A+
Application.DisplayAlerts = True
 

Discussions similaires

Statistiques des forums

Discussions
315 132
Messages
2 116 580
Membres
112 797
dernier inscrit
zouzou50