如何设置FileDialog在sharepoint中的初始目录，并允许您在VBA中选择多个项？

Question

我要做的是在网络路径中打开文件对话框。我已经想出了如何在正确的位置打开它，但它将自己设置为一个网站。

以下是代码：

Set files = Application.FileDialog(3) '3 is the File Picker type
    files.InitialFileName = "https://website.com/pathing/Document/"
    'files.InitialFileName = "\\website.com@SSL\pathing\Document\"
    files.AllowMultiSelect = True
    files.Show

设置初始文件名的两行操作完全相同。

当我运行代码时，我无法选择多个文件。不需要的行为

但是，当我手动输入\website.com@SSL\pathing\Document\文件时，文件对话框会按我的要求进行操作，允许我选择多个文件。期望行为

是否有一种方法可以让我直接达到预期的行为，而不必手动将其输入资源管理器栏？

谢谢。

Answer 1

如果您想直接访问它，您需要告诉资源管理器它处理的是webDav，实际上，如果您在资源管理器视图中打开一个库，SharePoint就会这样做。

所以你的库的路径是https://website.com/pathing/Document/。

所以UNC的路径是这样的：

\\website.com\davWWWroot\pathing\document\

但是，如果您遵循以下步骤，您可以自己获得正确的路径：

1. 在浏览器中打开路径
2. 切换到资源管理器视图
3. 复制资源管理器中的地址
4. 用复制的地址映射网络驱动器。
5. 网络驱动器为您提供了所需的UNC路径。