Date d'enregistrement...???

Le
Jeepy
Bonjour à tous,

Sur un fichier Excel qui se trouve sur un serveur, peut-on indiquer (de
façon simple) dans une cellule le moment du dernier enregistrement ?

Si oui, comment procéder ?

D'avance, un grand merci pour votre aide
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Jacky
Le #21120571
Bonjour,

Ceci dans le ThisWorkbook du classeur en question.
'---------------
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Feuil1.[A1] = Now()
End Sub
'--------------
"Feuil1" étant le code name de la feuille ( A adapter)

--
Salutations
JJ


"Jeepy"
Bonjour à tous,

Sur un fichier Excel qui se trouve sur un serveur, peut-on indiquer (de
façon simple) dans une cellule le moment du dernier enregistrement ?

Si oui, comment procéder ?

D'avance, un grand merci pour votre aide...




FdeCourt
Le #21121861
Salut,

Avec cette fonction :

Function LastSave()
On Error GoTo err_handler
Application.Volatile
LastSave = ThisWorkbook.BuiltinDocumentProperties("Last save
time")
On Error GoTo 0
Exit Function
err_handler:
LastSave = "error"
End Function

Cordialement,

F.
Publicité
Poster une réponse
Anonyme