VBA Excel - 使用网络路径名称而不是驱动器号

时间:2016-04-03 22:51:24

标签: excel vba excel-vba

如何更改P中的以下驱动器号以改为使用网络完整路径名?

我似乎无法弄清楚

wee

1 个答案:

答案 0 :(得分:3)

修改以适应:

    Dim FSO As FileSystemObject
    Dim DRV As Drive
    Dim FO As Folder
    Dim sPath As String

sPath = "\\RON-DODIER\Users"  'Network Folder Path

Set FSO = New FileSystemObject
Set FO = FSO.GetFolder(sPath)

Debug.Print FO.Drive.FreeSpace

您还可以使用File对象的Drive属性(如果这是您想要的更多),以确定可用空间量。