使用 VBA 将 Excel 表格和 PDF 保存到 SharePoint

Question

VBA 程序的目的是将插入的信息填充到 excel sheet 中，完成后将其转换为 PDF 文件。然后要求用户 select 保存它的路径。现在我还想将该 PDF 保存到 SharePoint 的固定目标位置。直到现在，我都不知道我应该如何告诉 VBA SharePoint 的路径。以下是当前保存文件的方式。保存到 SharePoint 是否以类似的方式工作？

Sheets("Example").Select

Dim varResult As Variant
Dim ActBook As Workbook

'Select path and file name
'PDF
varResult = Application.GetSaveAsFilename(FileFilter:= _
            "PDF (*.pdf), *.pdf", Title:="Save File", _
             InitialFileName:="Example " & UserForm2.TextBoxExampleNumber.Value)
             
'Adding Key words 

ActiveWorkbook.BuiltinDocumentProperties("Keywords") = UserForm2.TextBoxExampleNumbewr.Value & " " & UserForm2.TextBoxDate.Value & " " & UserForm2.TextBoxUsername.Value & " XXX" & " YYY" & " ZZZ"

'PDF EXPORT
ActiveSheet.ExportAsFixedFormat Filename:=varResult, Type:=xlTypePDF, OpenAfterPublish:=True, _
IncludeDocProperties:=True

Answer 1

我也使用 Sharepoint - 我有可以直接上传到 Sharepoint 的宏。您需要在文件资源管理器和 Sharepoint 之间建立连接。

在 Internet Explorer 中打开 Sharepoint（不是 Chrome）
在顶部菜单栏中，转到库，然后在“连接和导出”下单击“使用资源管理器打开”。这将在文件资源管理器中打开 Sharepoint 文件路径，看起来类似于：网络(XXX)/https://sharepoint.xxxx.com/page
然后您可以在vba中输入此路径作为目标文件路径。只要路径与您映射的路径完全匹配，它就应该直接上传到 Sharepoint。

使用 VBA 将 Excel 表格和 PDF 保存到 SharePoint

Saving Excel Sheets and PDFs to SharePoint with VBA

excel

sharepoint

vba