Drives プロパティ
ローカル コンピューターで使用できるすべての Drive オブジェクトで構成される Drive コレクションを返します。
構文
オブジェクト。ドライブ
オブジェクトは常に FileSystemObject です。
注釈
Drives コレクションには、メディアが挿入されていない場合でも、リムーバブル メディア ドライブが表示されます。
For Each..を使用して 、ドライブ コレクションのメンバーを反復処理できます 。次 のコードに示すように、次のコンストラクト。
Sub ShowDriveList
Dim fs, d, dc, s, n
Set fs = CreateObject("Scripting.FileSystemObject")
Set dc = fs.Drives
For Each d in dc
s = s & d.DriveLetter & " - "
If d.DriveType = 3 Then
n = d.ShareName
Else
n = d.VolumeName
End If
s = s & n & vbCrLf
Next
MsgBox s
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。