Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 29
Default count subfolders

Hi,
The properties of a windows folder gives you file size on disk, file count,
and folder count.
I need a vba to extract that info.
Any ideas???

peter
(nested folders and files included)
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default count subfolders


Sub GetFolderInfo()

strFolder = "C:\temp"

Set fso = CreateObject _
("Scripting.FileSystemObject")
Set folder = _
fso.GetFolder(strFolder)


FolderSize = folder.Size
Files = folder.Files.Count
Subfolders = folder.Subfolders.Count
Size = folder.Size
End Sub


--
joel
------------------------------------------------------------------------
joel's Profile: http://www.thecodecage.com/forumz/member.php?userid=229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=149288

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Add subfolders and name - Possible? Trish Smith Excel Programming 2 August 17th 08 02:29 AM
Auto look through subfolders grewpp Charts and Charting in Excel 1 February 14th 06 02:35 PM
please help me with folder and subfolders pieros Excel Programming 2 November 4th 05 12:52 PM
copy subfolders, replace text in files and save files in copied subfolders pieros Excel Programming 0 November 1st 05 12:08 PM
Get list of subfolders Darren Hill[_3_] Excel Programming 3 March 6th 05 09:28 PM


All times are GMT +1. The time now is 04:41 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"