j'ai ceci qui permet d'avoir la date d'enregistrement d'un fichier mais il
semble qui doit être ouvert pour cela..;
Function InfosDuFichier()
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(ThisWorkbook.FullName)
InfosDuFichier = "Dernière modification le: " & f.DateLastModified
Set fso = Nothing
End Function
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
...Patrick
oupssss
j'ai trouvé tout seul Bye
MERCI
"...Patrick" a écrit dans le message de news: O6$
Bonsoir ou Bonjour c'est selon...
j'ai ceci qui permet d'avoir la date d'enregistrement d'un fichier mais il semble qui doit être ouvert pour cela..;
Function InfosDuFichier() Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(ThisWorkbook.FullName) InfosDuFichier = "Dernière modification le: " & f.DateLastModified Set fso = Nothing End Function
Comment avoir l'info s'il est et reste fermé ?
Merci
oupssss
j'ai trouvé tout seul
Bye
MERCI
"...Patrick" <NOSPAM_p_mackay@hotmail.com> a écrit dans le message de news:
O6$x7U4eGHA.4912@TK2MSFTNGP05.phx.gbl...
Bonsoir ou Bonjour c'est selon...
j'ai ceci qui permet d'avoir la date d'enregistrement d'un fichier mais il
semble qui doit être ouvert pour cela..;
Function InfosDuFichier()
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(ThisWorkbook.FullName)
InfosDuFichier = "Dernière modification le: " & f.DateLastModified
Set fso = Nothing
End Function
j'ai ceci qui permet d'avoir la date d'enregistrement d'un fichier mais il semble qui doit être ouvert pour cela..;
Function InfosDuFichier() Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile(ThisWorkbook.FullName) InfosDuFichier = "Dernière modification le: " & f.DateLastModified Set fso = Nothing End Function
