HARD DRIVE

R

Roger Govier

Hi Denise

In Windows Explorer or My Computer, right click on the Drive
letter>properties
 
G

Gary''s Student

Easy:

Sub servient()
sPath = "C:"
Set oFs = CreateObject("Scripting.FileSystemObject")
Set drv = oFs.GetDrive(oFs.GetDriveName(sPath))
fullsize = drv.TotalSize
MsgBox (fullsize)
End Sub
 
G

Gordon

Gary''s Student said:
Easy:

Sub servient()
sPath = "C:"
Set oFs = CreateObject("Scripting.FileSystemObject")
Set drv = oFs.GetDrive(oFs.GetDriveName(sPath))
fullsize = drv.TotalSize
MsgBox (fullsize)
End Sub


ROTFLMAO!
 
G

Gary''s Student

Its the only answer that makes sense in an Excel context. If the poster was
interested in the physical size rather than the disk capacity, the answer
would have been to open the computer and measure the length, width, and
height with a tape measure!
 
J

JLatham

But we had insufficient information to properly answer it in that context:
inches or cm was not specified. So, I believe your response is accurate and
within context <g>
 
J

JLatham

May not have specifically been an Excel question - but she had smarts enough
to come to the group that she knew could handle an adhoc question!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top