Date et heure de sauvegarde

Hermione · 16 Janvier 2008

Bonjour
Je souhaiterais mettre dans une cellule d'un tableau excel (excel 2000) la date du dernier enregistrement de ce document.
Cela permettrait de voir la date de la dernière mise à jour.
Merci de votre aide

Hermione

pierrejean · 16 Janvier 2008

Re : Date et heure de sauvegarde

bonjour Hermione

une solution:

Code:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Feuil1").Range("A1") = Now
End Sub

Robert · 16 Janvier 2008

Re : Date et heure de sauvegarde

Bonjour Hernione, bonjour le forum,

Essaie avec cette macro événementielle à adapter et à placer dans le composant ThisWorkbook :

Code:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("ton_onglet").Range("ta_cellule").Value = Now
ActiveWorkbook.Save
End Sub

Édition :

Ha ! Sacré PierreJean tou dégaine plous vite que moi Hombre ! Bonjour...

pierrejean · 16 Janvier 2008

Re : Date et heure de sauvegarde

re

Salut Robert 🙂 🙂

Mon neurone est peut-etre plus rapide que le tien mais le tien en fait plus !

et puis tu n'oublies pas de sauver avant de sauver

Date et heure de sauvegarde

Hermione

Guest

pierrejean

XLDnaute Barbatruc

Robert

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

Discussions similaires

Date et heure de sauvegarde

Hermione

Guest

pierrejean

XLDnaute Barbatruc

Robert

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency