Search for old files by last accessed from a designated folder

I want users to be able to see a list of files they last accessed over a period of time, then to select through a multiselect listbox and kill the files. My problem comes when trying to import the last accessed date along with the file details(Which the code below does quite adequately). The displaying and killing of the files isn't a problem it's just finding the last accessed date and display in the column next to the file details. This my first post so please be nice to me. Thanks in advance Dave

Please Login or Register  to view this content.

Hello bodiewil,

You will need to need to use the File System Object to get the last modified date and to recurse the subfolders. Excel 2007 and later no longer uses the Application.FileSearch. The last argument of this macro is a boolean value. True will recurse through all the subfolders of the source folder listing the files and false lists only the files in the source folder.

Please Login or Register  to view this content.

Calling the macro

Please Login or Register  to view this content.

Hello bodiewil,

I don't know why I used DateLastModified property. Just change that to DateLastAccessed.

The other problem was a typo. That should read....

Please Login or Register  to view this content.

Hello bodiewil,

To add the file size ...

Please Login or Register  to view this content.