Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…