enregistrement automatique

M

Marti

Guest
Bonsoir à tous.

Je souhaite enregistrer un classeur excel dans un fichier "archive" sous le nom qui sera la date du jour, en cliquant sur un bouton. Ca me prend la tête et ça ne marche pas !!! Quelqu'un peut-il m'aider ? Ca serait vraiment sympa Merci à tous.
 
H

Hervé

Guest
Bonsoir

ce code permet de sauvegarder ce classeur sous le nom = date


ActiveWorkbook.SaveAs Filename:=Format(Date, "ddmmyy") & ".xls"

celui ci , copie le classeur , sauvegarde le nouveau classeur, et le ferme
Worksheets.Copy
ActiveWorkbook.SaveAs Filename:=Format(Date, "ddmmyy") & ".xls"
ActiveWorkbook.close

Salut
Hervé
 

Discussions similaires

Statistiques des forums

Discussions
312 636
Messages
2 090 365
Membres
104 511
dernier inscrit
hsakho