Macro sauvegarde d'un fichier

Bonjour,

J'ai une macro permettant d'enregistrer une archive de mon fichier en cours d'utilisation puis de le réinitialiser.

J'ai une difficulté avec l'enregistrement de mon archive, afin d'avoir un nom personnalisé automatique, j'ai créé une macro qui combine le nom du fichier actuel + la date actuelle (récupérée dans une cellule) + l'extension du fichier.

LeNom = Left(wk, Len(wk) - 5) & " (" & date_archive & ")" & ".xlsm"

Toutefois, aucun fichier n'est enregistré dans le répertoire que je choisi lorsque je lance ma macro d'archivage.

Mon fichier est en pièce-jointe.

Merci d'avance pour votre aide.

Baptiste.

Bonjour

Un nom de fichier ne doit pas contenir de caractères spéciaux comme "/"

Modifie ainsi le nom et essaie :

date_archive = Replace(Range("A1").Value, "/", "-")

Bye !

Bonjour

C'est parfait merci beaucoup !

Bapt.

Rechercher des sujets similaires à "macro sauvegarde fichier"