C Chip Pearson Nov 23, 2003 #2 George, In VBA, go to the Tools menu and choose References. There, check the box next to "Microsoft Scripting Runtime" and use code like the following: Dim FSO As New Scripting.FileSystemObject Dim F As Scripting.Folder Set F = FSO.GetFolder("C:\Temp") Debug.Print F.Size -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com
George, In VBA, go to the Tools menu and choose References. There, check the box next to "Microsoft Scripting Runtime" and use code like the following: Dim FSO As New Scripting.FileSystemObject Dim F As Scripting.Folder Set F = FSO.GetFolder("C:\Temp") Debug.Print F.Size -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com