Partager via


Drives, propriété

Retourne une collection Drives composée de tous les objets Drive disponibles sur l’ordinateur local.

Syntaxe

objet . Lecteurs

L’objet est toujours un FileSystemObject.

Remarques

Les lecteurs de supports amovibles apparaissent dans la collection Drives même lorsqu’aucun support amovible n’y est inséré.

Vous pouvez itérer les membres de la collection Drives à l’aide d’un for each... Construction suivante , comme illustré dans le code suivant.

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

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.