查找PC存储驱动器名

Question

如何找到我的PC驱动器名称并在Excel中列出？

例如，我的pc有驱动器"C:/“、"D:/”和"E:/“，我是否可以使用VBA获得这些字母？谢谢。

Answer 1

你可以试试-

Sub ShowDriveLetter()
    For Each drv In CreateObject("Scripting.FileSystemObject").Drives
        Debug.Print drv.Path
    Next
End Sub

输出：

​

​