Connaître la date de modification du fichier Excel

Bonjour,

Après avoir téléchargé un fichier Excel depuis ma boite mail, j'ai voulu connaître la date de dernière modification de ce fichier en allant dans les propriétés de celui-ci, malheureusement ça ne me donne pas la bonne date.

Je voulais donc savoir si il existait une commande particulière ou un moyen d'avoir une trace des véritables dates de création et de modification ?

En vous remerciant

Bonsoir

Sub dernière_modif()

ActiveCell = ActiveWorkbook.BuiltinDocumentProperties(12)

' 8 te donnerait le numéro de révision

End Sub

inscrit dans la cellule active la date de dernière sauvegarde

Bonsoir;

je ne sais pas si cela te convient mais regarde et essaie

Private Sub Worksheet_Activate()

Range("A1").End(xlDown).Select

If ActiveCell.Value <> Date Then

ActiveCell.Offset(1, 0).Select

ActiveCell.Value = Date

ActiveCell.Offset(0, 1).Select

End If

End Sub

A+

Salut RedHot, Michel_m, Henri et le forum

La liste des propriétes d'un classeur

01    Title
02    Subject
03    Author
04    Keywords
05    Comments
06    Template
07    Last author
08    Revision number
09    Application name
10    Last print date
11    Creation date
12    Last save time
13    Total editing time
14    Number of pages
15    Number of words
16    Number of characters
17    Security
18    Category
19    Format
20    Manager
21    Company
22    Number of bytes
23    Number of lines
24    Number of paragraphs
25    Number of slides
26    Number of notes
27    Number of hidden Slides
28    Number of multimedia clips
29    Hyperlink base
30    Number of characters (with spaces)

La valeur de retour = ActiveWorkbook.BuiltinDocumentProperties(LeChiffre)

Mytå

Je tiens à tous vous remercier (michel_m, henri et Myta) de m'avoir aidé