enregistrement automatique des fichiers excel - VB/VBA/VBS - Programmation
Marsh Posté le 02-05-2006 à 08:23:34
Bonjour aravis
Bonjour à tous
Le code suivant sauvegarde le fichier à "chaque fois qu'il est fermé" sous son nom avec la date du jour, mais en "nombre" par rapport à l'année 1900, même si la personne le sauvegarde sous un autre nom :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim monfichier As Single
monfichier = Date
ActiveWorkbook.SaveAs FileName:="C:\toto du " & monfichier & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub
Attention c'est systématique, donc cela ecrase le fichier qui a été fermé quelque temps avant, mais uniquement le jour même, celui de la veille n'est plus modifié.
Dans ce code il n'y a pas de mot de passe mais tu peux en ajouter un : Password= "titi" par exemple
J'espère que j'ai été clair
Cordialement
Marsh Posté le 01-05-2006 à 17:23:59
bonjour, je me posé la question suivante. Existe t'il une fonction qui permet d'enregistrer tout les jours sous un fichier excel différent un meme fichier ?
Mon fichier excel sert a la supervision d'un equipement, donc les données a l'interieur change a chaques fois.
Ou bien enregistrer sur une nouvelle page.
Le tout en vba bien sur
merci d'avance