Question

我想打开一个Excel文件，该文件存储在我的SharePoint文件夹

下

// Documents // Design // Excel //items.xlsx

我通过互联网搜索并提出以下代码。代码的问题是打开＆＃34;文件打开＆＃34;本地驱动器中的对话框。

任何人都可以，建议我使用的代码，可以从SharePoint打开Excel文件

这是我尝试过的，前面的例子在论坛中尝试过

Sub Share()
Dim S As Workbook
Dim WB As Variant

With Application.FileDialog(msoFileDialogOpen)
.InitialFileName = "https://Sharepoint.de/Content/0030/default.aspx" & "/RootFolder=%2Fcontent%2F00008200%2FTeam%20Documents%2F02%20%2D%20Design%2F0001%20Design%2FExcel&FolderCTID=0x01200083BC38D90EC5674491B520CC48282737&View={28035ED9-59EF-42BE-BA4B-A36193C54539}&InitialTabId=Ribbon%2EDocument&VisibilityContext=WSSTabPersistence"

.AllowMultiSelect = False
.show

For Each WB In .SelectedItems
Set S = Workbooks.Open(WB)
Next
End With

If S Is Nothing Then Exit Sub

End Sub

提前感谢你

Answer 1

This SO article很好地涵盖了您的问题。要访问文件系统（包括网络）中的文件：

此方法打开某个工作簿：

Workbooks.Open ("yourWorkbook.xls")

Documentation和examples这种方法。

如果你真的想打开文件夹，你可以使用它：

Application.FollowHyperlink "FolderLocation"

Documentation此方法。

编辑：

使用This SO文章中描述的UNC路径。将您的文件名添加到路径中，并使用上面的方法访问它。

您可以使用简单的Cells(RowCtr, 1).Value = f.Name替换文章中示例代码中的Debug.Print f.Name来检查结果。

VBA从sharepoint文件夹中打开特定的Excel文件

1 个答案:

编辑：