Sauvegarde nom de l'xls+mois+année

[edes]

Re bonjour à tous

Je voudrais enregistrer mon tableau avec une macro qui rajoutera automatiquement le mois et l'année en cours
Si il existe déjà il supprime le précédent si non il créé un nouveau avec mois et l'année.

J'ai un bout de code qui ne fonctionne pas car il ne me renseigne pas le mois et l'année.


Merci d'avance pour votre aide

Sub Macro1()
'
' Macro1 Macro
'
' Keyboard Shortcut: Ctrl+Shift+D
'
    ChDir "H:\OSS_Shared\Delhaize Direct\Harchives Visites-Stores\General"
    ActiveWorkbook.SaveAs Filename:= _
        "H:\OSS_Shared\Delhaize Direct\Harchives Visites-Stores\General\Rapport de viste & format (date, mm-yyyy).xlsm" _
        , FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub

 

[Pierrot93]

Re : Sauvegarde nom de l'xls+mois+année

Bonjour edes

rajoute les guillemets :

Format(Date, [COLOR="red"]"[/COLOR]mm-yyyy[COLOR="Red"]"[/COLOR])

bonne fin d'après midi
@+

 

[edes]

Re : Sauvegarde nom de l'xls+mois+année

Bonjour pierrot

Il me donne un code erreur compil ?😕

 

[Pierrot93]

Re : Sauvegarde nom de l'xls+mois+année

Re,

oui, il faut également tenir compte de l'extension ainsi, attention ci dessous pour une version 2003, je n'ais pas 2007...

ActiveWorkbook.SaveAs Filename:="Rapport de viste " & Format(Date, "mm-yyyy") & ".xls"

 

[edes]

Re : Sauvegarde nom de l'xls+mois+année

c'est parfait un grand merci encore