Files within Multiple SubFolders and SubFolders Within It

Hey Guys,

In need of some assistance. Basically, my objective is to get the list of files inside a particular directory. Directory includes many subfolders and inside those we again have 'n' number of folders. Am able to successfully get the file list if they in the parent or within 1-level subfolders. I need to get the list of files from 'n' number of levels of directory.

Please Login or Register  to view this content.

Thing is, I don't have pre-defined knowledge of how many levels it could be as it is defined by the users. With my above code, I know I'll have to repeat the loop for SubFolders and Files in them to the times the levels available. So I just need to know how many times, I'll have to loop or so..

Am very much fond of new thoughts and suggestions if something better hit your heads.. Open for thoughts!

See if this helps...

Add a filespec ('c:\temp\*.xl*' for example) in A1 of a blank sheet. All matching files will be returned in Col B and run the code.

It does open another blank window on screen - unfortunately this cannot be hidden, but it should disappear fairly quickly depending on how many files are found.

Please Login or Register  to view this content.

If you think this is suitable, it would be easy to split out/determine the actual information you need.

Hey Cytop,

Thanks much for your response. Idea was good to get the count for the folders but really that CMD window is one annoying thing that needs to be closed everytime... :p

I've worked out on my codes and am able to get my answers. I've used recursive method to get it work. But its running a bit slow as its calling the function again and again, plus, considering the amount of search its making in the disk. (I must say, I hate loops!! )

Following is my updated code.

Please Login or Register  to view this content.

P.S. BoostMacroPerformance is a method that I use to set certain settings of the application (ScreenUpdating, EnableEvents, Calculation and DisplayAlerts) to boost the speed of macro to an extent.

Only thing that am not able to get the property - "Last Saved By" of the file and any alternate ways to boost up the speed by avoiding loop if we can..

It is buddy. Actually, it seems that it comes with Windows 7 as I haven't seen this property in Windows XP or before. Its an extended property under Origin section. Can't find a way to get to it..

http://s23.postimg.org/j5rxjftu3/Last_Saved_By.jpg

Hey Guys,

I made a little research, and have found that the property actually belongs to BuiltinDocumentProperties of the workbook and can be made in use when file is open. Any ways to call use this property without opening the file..? Below code works and gets me the detail

Please Login or Register  to view this content.

Alright, I've got the solution to my issue. It involves usage of an extra DLL called "DSOFile" which I believe will be working on only with Office version - 2007 onwards. Am not sure about whether if it works for 2003 or before.

Please Login or Register  to view this content.

Here is the link from where I got my solution.