【書式】
Drive.DriveLetter
ドライブ名を返します
ネットワークで共有しているディスクなどで、ドライブ名が設定されていない場合は""が返ります。
Sub test27() Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject") ''Cドライブのドライブ名「C」を表示します MsgBox FSO.GetDrive("C").DriveLetter Set FSO = Nothing End Sub