Date de dernière modif

[KINX]

Bonjour,

j'aimerai connaitre la procédure pour afficher sous Excel dans une celule la date de dernière modification du classeur.
Je pense qu'il faille passer par vba, du type expression.datelastmodified...mais je n'ai pas la bonne syntaxe.
Merci bcp par avance

 

[Pierrot93]

Re : Date de dernière modif

Bonjour Kinx

essaye peut être ainsi :

Range("A1").Value = CDate(Workbooks("nomduclasseur.xls").BuiltinDocumentProperties("Last save time"))

bon après midi
@+

 

[BOISGONTIER]

Re : Date de dernière modif

Bonjour,

Dans un module

Function DernièreSauvegarde()
  Application.Volatile
  DernièreSauvegarde = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

Dans une cellule =DernièreSauvegarde()

JB

 

[KINX]

Re : Date de dernière modif

Bonjour,

Dans un module

Function DernièreSauvegarde()
  Application.Volatile
  DernièreSauvegarde = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

Dans une cellule =DernièreSauvegarde()

JB

Lz code a l'air de carrément bien marché...jdis à l'air car jverrais demain si ca me conserve la date d'aujourd'hui de modif...
Eb tout cas merci bcp bcp, j'viens de découvrir le site, c'est top!...merci donc bcp!!

 

[KINX]

Re : Date de dernière modif

Ce code met en débogage...en revanche le code qui m'a été proposé juste en dessous à l'air ( car a voir demain apres mofif d'aujourd'hui) de tres bien marché..si ca t'interresse BOISGONTIER m'a proposé
Function DernièreSauvegarde()
Application.Volatile
DernièreSauvegarde = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

En tout k merci bcp !!

 

[KINX]

Re : Date de dernière modif

Bonjour,

Sur ce code que vous m'avez fourni (qui marche très bien), en fait à chaque consultation du classeur meme sans modification une sauvegarde à la fermeture du classeur est demandée systématiquement..ce qui peut être un peu "perturbant pour des Si vous avez donc une petite astuce...merci bcp d'avance.
Kinx

 

[KEUDJ]

Re : Date de dernière modif

Bonjour kinx, le forum,

voici un classeur qui a ete fait grace au forum, je n`en suis pas l`auteur,
a toi de voir si cela te convient ..
attention j`ai bloque les option de sauvegarde

enjoy ..

 

[KINX]

Re : Date de dernière modif

Bonjour kinx, le forum,

voici un classeur qui a ete fait grace au forum, je n`en suis pas l`auteur,
a toi de voir si cela te convient ..
attention j`ai bloque les option de sauvegarde

enjoy ..

Bonjour Keudj,

Euh a vrai dire je ne sais comment trop exploiter ce dont tu m'as fourni
A la base j'avais le code suivant qui m'avait été fourni par BOISGONTIER:

Function DernièreSauvegarde()
Application.Volatile
DernièreSauvegarde = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

ce code affiche la derniere date de modif du classeur...et J'aurais juste aimé une ptite modif pour que l'enregistrement ne soit demandé que s'il y a effectievement eu modif..

A vrai dire ptet que ce code le permet, mais corerspond il vraiment à la requete
Merci à toi