如何使用部分文件名打开SharePoint文件?
我有一个每年更新的文件(Demand 2016,Demand 2017等)。
我目前将该文件与SharePoint网址链接。
*(ptr + i)
我想在名称中找到名为“Demand”的文件。
答案 0 :(得分:2)
在上述评论的帮助下,我找到了一个有效的解决方案。下面是在SharePoint根目录中循环访问文件名并打开类似于字符串名称的文件的代码
Public Sub ListFiles()
Dim folder As folder
Dim f As File
Dim fs As New FileSystemObject
Dim demandwb As Workbook
Set folder = fs.GetFolder("//(SHAREPOINT URL)/GRS Demand Plan")
For Each f In folder.Files
If f.Name Like "GRS Demand Plan*" Then
Set demandwb = Workbooks.Open(f)
End If
Next f
End Sub