If by "envelope" you mean folder, you can use the Scripting.FileSystemObject
to get the various file dates. E.g.,

Sub AAA()
Dim FSO As Object
Dim FF As Object
Set FSO = CreateObject("Scripting.FileSystemObject")
Set FF = FSO.GetFolder("C:\Temp") '<<< CHANGE TO YOUR FOLDER
Debug.Print FF.DateCreated, FF.DateLastAccessed, FF.DateLastModified
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
(email address is on the web site)


"Phil" wrote in message
...
When I import a file I want to include the envelope information, i.e.,
file
name, date and time created, along with each record. How can I do this