url - 来自 URL 的 Excel VBA 列表文件

Question

好的，我将如何记录位于远程服务器上的文件夹中的所有文件，我必须使用 URL 访问这些文件，例如http://domain.com/folder并且在文件夹内有一堆文件我会就像列出到excel中一样。当尝试列出当前 C:\ 上的文件夹中的文件时，有一些函数会执行此操作，但在尝试列出 URL 中的文件时它们不起作用。我不确定这是否可以做到！谢谢

Answer 1

将服务器目录映射为您机器上的本地驱动器（例如 O:）并使用小型 VBA 程序，例如

Sub ServerDir()
Dim Idx As Integer, FN As String, R As Range

    Set R = Selection
    Idx = 1
    ' URL =  http://repository.XXXXX.com/content/dav/Repository/Users/Users-M/mike.d/mike.d-Public/
    ' mapped http://repository.XXXXX.com/content/dav/ to O:\ 
    FN = Dir("O:\Repository\Users\Users-M\mike.d\mike.d-Public\*.ppt")

    Do While FN <> ""
        R(Idx, 1) = FN
        FN = Dir()
        Idx = Idx + 1
    Loop

End Sub