Hi,

For this you can use dsofile.dll
Remember to register it.

In your VBA

Dim oFilePropReader As DSOleFile.PropertyReader
Dim oDocProp As DSOleFile.DocumentProperties

Sub FileInfo(ByVal strPath As String)
Set oFilePropReader = New DSOleFile.PropertyReader
Set oDocProp = oFilePropReader.GetDocumentProperties(strPath)
' Same examples
Debug.Print oDocProp.DateCreated
Debug.Print oDocProp.TotalEditTime
Debug.Print oDocProp.DateLastPrinted
Debug.Print oDocProp.DateLastSaved
End Sub

Wouter HM


71marco71 wrote in message ...
Dear friends
I would like to know the date of last access to my xls files present in
my directory C
Is it possible with a VBA code?


---
Message posted from http://www.ExcelForum.com/