XL2000 - List Drive letters and folders

[MarkOwen]

Hi,
I am trying to write some code that will list all the Drive Letters (i.e. C:\, E:\ etc) that are available on a users computer so I can add the return values into a Combo Box on a form in Excel 2000.
For each one of the Letters I would like to list all available Folder Paths into a separate Combo Box.

Is it possible to do this and how would I go about it?

Any help will be greatly appreciated

Thanks

Mark

 

[Chattin]

This should get you started

Sub ShowDriveList()
'

http://www.mrexcel.com/board2/viewtopic.php?t=63766&highlight=drive

Dim fs, d, dc, s, n
Set fs = CreateObject("Scripting.FileSystemObject&quot
Set dc = fs.Drives
For Each d In dc
s = s & d.DriveLetter & " - "
If d.DriveType = Remote Then
On Error Resume Next
n = d.ShareName
Else
On Error Resume Next
n = d.VolumeName
End If
s = s & n & vbCrLf
Next
MsgBox s
End Sub