vba 打开 sharepoint 文件

以下是使用VBA打开SharePoint文件的示例代码：

Sub OpenSharePointFile()
    Dim sharepointFolder As Object
    Dim filePath As String
    
    ' 映射SharePoint文件夹
    Set sharepointFolder = CreateObject("WScript.Network").MapNetworkDrive("Z:", "http://your/sharepoint/path")
    
    ' SharePoint文件路径
    filePath = "Z:\path\to\file.docx"
    
    ' 打开文件
    Workbooks.Open (filePath)
    
    ' 取消映射SharePoint文件夹
    sharepointFolder.Remove
End Sub

该代码首先使用`MapNetworkDrive`方法映射SharePoint文件夹，然后使用`Workbooks.Open`方法打开文件。最后，使用`Remove`方法取消映射的SharePoint文件夹。