How to get the creation date of imported file?

[n_ice]

I'm importing text file to Excel. How can I get the creation date of
this file?

 

[Andy Wiggins]

This will give you the information you want
In the TEST sub, substitute "ActiveWorkbook.FullName" for you file's spec

Sub TEST_ShowFileInfo()
Debug.Print ShowFileInfo(ActiveWorkbook.FullName)
End Sub

''
***************************************************************************
'' Purpose : Get a file's "Date Created"
Function ShowFileInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
ShowFileInfo = Format(f.DateCreated, "yyyy-mm-dd")
End Function