VBA Excel ドライブ数を表示

以下は、VBAでドライブの数を表示するサンプルです。






Sub display_drive_number()

    Set MyFSO = CreateObject("Scripting.FileSystemobject")
     
    MsgBox MyFSO.Drives.Count
 
    Set MyFSO = Nothing

End Sub