[XL-2003] Fonction taille et date ? [Résolu]

[BenDefi]

Bonjour,

Quelqu'un saurait s'il existe une formule Excel pour afficher la date de création du fichier (pas la dernière modif mais la création) et une autre pour la taille du fichier ?
Je pensais à une formule type =INFORMATIONS("??????") mais j'ai rien trouvé !
S'il faut passer par une macro pourquoi pas, mais je suis sec sur le sujet.


Merci d'avance.

[Daniel.C]

Bonjour,

Code :

1
2
3
4
5
6
Function DateCreat()
    Dim FSO As Object
    Application.Volatile
    Set FSO = CreateObject("scripting.FileSystemObject")
    DateCreat = FSO.getfile(ThisWorkbook.FullName).datecreated
End Function

J'ai oublié la taille :

Code :

1
2
3
4
5
6
Function Taille()
    Dim FSO As Object
    Application.Volatile
    Set FSO = CreateObject("scripting.FileSystemObject")
    Taille = FSO.getfile(ThisWorkbook.FullName).Size
End Function

[BenDefi]

Cool, merci.