Date de dernière modif

Pierrot93

XLDnaute Barbatruc

• 21 Avril 2009

• #2

Re : Date de dernière modif

Bonjour Kinx

essaye peut être ainsi :

Code:

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

bon après midi
@+

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 21 Avril 2009

• #3

Re : Date de dernière modif

Bonjour,

Dans un module

Code:

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

Dans une cellule =DernièreSauvegarde()

JB

 

Pièces jointes

• FonctionDerniereSauvegarde.xls

  22 KB · Affichages: 74

Dernière édition: 21 Avril 2009

Vote positif 0 Vote négatif

K

KINX

Guest

• 21 Avril 2009

• #4

Re : Date de dernière modif

BOISGONTIER à dit:

Bonjour,

Dans un module

Code:

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

Dans une cellule =DernièreSauvegarde()

JB

Cliquez pour agrandir...

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!!

 

Vote positif 0 Vote négatif

K

KINX

Guest

• 21 Avril 2009

• #5

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 !!

 

Vote positif 0 Vote négatif

K

KINX

Guest

• 30 Avril 2009

• #6

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

 

Vote positif 0 Vote négatif

K

KEUDJ

Guest

• 30 Avril 2009

• #7

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 ..

 

Pièces jointes

• test3_08-08-2008_102745.zip

  20.3 KB · Affichages: 42

Vote positif 0 Vote négatif

K

KINX

Guest

• 30 Avril 2009

• #8

Re : Date de dernière modif

KEUDJ à dit:

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 ..

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif