Enregistrement automatique d'un classeur

Cousinhub

XLDnaute Barbatruc

• 12 Février 2008

• #2

Re : Enregistrement automatique d'un classeur

Bonsoir,
j'avais vu ta question sur ton précédent fil, mais manquant de précision....
est-ce qu'il faut créer un nouveau fichier?
remplacer celui existant?

Edit : c'est gênant, les gars qui posent une question, se déconnectent, puis reviennent bien plus tard, voir si on a une solution. Des fois, on a besoin de précision........

 

Vote positif 0 Vote négatif

B

Boulie72

Guest

• 12 Février 2008

• #3

Re : Enregistrement automatique d'un classeur

Bonsoir,

Merci d'essayer de m'aider. En fait je t'explique j'ai crée un dossier et dedans je veux que à chaque fois que l'on passe minuit ou une autre heure que je choisis il y est une copie du fichier d'origine ayant comme nom la date du jour.

Ainsi au bout d'une semaine il y aura 7 fichiers + celui d'origine.

Voila j'espère que je t'ai mieux expliqué.

Au fait je reste connecté et je viens voir toutes 10 minutes les réponses!!!

Merci d'avance

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 12 Février 2008

• #4

Re : Enregistrement automatique d'un classeur

Bonsoir,
le fichier
dans le workbook_open, l'instruction :

Code:

Private Sub Workbook_Open()
Application.OnTime TimeValue("00:00:01"), "sauvegarde"
End Sub

qui va déclencer la procédure de sauvegarde à minuit et 1 seconde (ceci, tu le verras après de sauvegarder à la date de la veille)

puis dans le module, ce code :

Code:

Sub sauvegarde()
ChDir ActiveWorkbook.Path
nom = "boulie_" & Format(Date - 1, "yyyy_mm_dd") & ".xls"
ThisWorkbook.SaveAs Filename:=nom
End Sub

où on sauvegarde à l'anglaise, l'année en premier, puis le mois, puis le jour, tout ceci pour un tri plus facile.
Cette macro est déclenchée à l'heure fixéé dans le "Open"

 

Pièces jointes

• bouliev2.zip

  10.3 KB · Affichages: 31

Dernière édition: 12 Février 2008

Vote positif 0 Vote négatif

B

Boulie72

Guest

• 12 Février 2008

• #5

Re : Enregistrement automatique d'un classeur

Merci beaucoup de ton aide. En plus c'est sympa d'avoir complété mon fichier. Comme ca il est bien complet!!!


Il y a vraiment des gens sympa sur ce forum!!!

Bonne soirée

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 12 Février 2008

• #6

Re : Enregistrement automatique d'un classeur

Re-,
PS : au fait j'ai quelque peu modifié le code de la feuille, ainsi, en entrant une donnée, puis appui sur "Entrée", on se déplace vers la 1ère cellule non verrouillée

 

Vote positif 0 Vote négatif