Can I retrieve ‘Date Modified’ from a CSV file???

[Rags]

Hi

Is there any way to retrieve the ‘Date Modified’ from a CSV file? As far as I know this is not stored in such a file but the information is retained in Windows Explorer. Can I somehow access it from Excel and place it in a cell or assign to a variable?

Thanks for any help.

 

[Lewiy]

Try this:

Sub ModifiedDate()
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(“C:/MyFile.csv”)
MsgBox f.DateLastModified
End Sub

Change the file path as appropriate.

 

[Rags]

Thanks, that's really good.

Is there any way to format the date to: 22 August 2007 09:12:16

 

[Lewiy]

Perhaps like this:

Sub ModifiedDate()
Dim fs, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile("C:\MyFile.csv")
Range("A1") = f.DateLastModified
Range("A1").NumberFormat = "dd mmmm yyyy hh:mm:ss"
End Sub

 

[Rags]

Ok thanks very much, I'll give it a try.

Rags