The code below can get no. of file in folder F:\PIC,
folderPath = "F:\PIC"
Set FSO = CreateObject("Scripting.FileSystemObject")
noOfFiles = FSO.GetFolder(folderPath).Files.count
How to modify "F:\PIC" so that it can get total no. of file
inside any folders that are in F:\PIC?
Please Login or Register to view this content.
Avoid using Select, Selection and Activate in your code. Use With ... End With instead.
You can show your appreciation for those that have helped you by clicking the * at the bottom left of any of their posts.
bakerman2,
Can I just modify "F:\PIC" to something like "F:\PIC\*.*" etc so as to include all files in folder "PIC"?
If not, please revise your VBA so that the folderPath = "F:\PIC".
It is possible but where or how do you want results to be displayed?
Do you want count per subdirectory or total of all files in directory F:\PIC and all subdirectories?
I want all files in directory F:\PIC and all subdirectories.
(the result shows on say Cell B1 of active excel)
Last edited by london7871; 07-14-2016 at 10:46 PM. Reason: Clarify location of result
Please Login or Register to view this content.
Last edited by bakerman2; 07-15-2016 at 01:26 AM.
Thanks bakerman2
I will revise the above to suit my actual situation.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks