如何從Excel VB中提取我所在的sharepoint文檔庫的URL /路徑？

我想爲我在Excel文檔庫中創建的項目設置文件名。但是，當我試圖干涉標準保存與我自己的文件名，它想要保存到我的LOCAL MACHINE。如果有必要的話，我會很樂意提供PATH，但我真的不想要硬代碼。如何從Excel VB中提取我所在的sharepoint文檔庫的URL /路徑？

是否有任何屬性可以用來解析此信息？元數據？模板？

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 
If SaveAsUI Then 
    Sheets("Purchase Order").Range("Description,VendorInfo,QUANTITY1,PRODUCT1,ITEM1,PRICE1,submitter,ShipVia,Terms,MACRO_ALERT").Interior.ColorIndex = xlColorIndexNone 
    Sheets("Purchase Order").Range("Location").Interior.Color = RGB(184, 204, 228) 
    Sheets("Purchase Order").Range("MACRO_ALERT").Value = "" 

    Dim MyFileName As String 
Dim MyFilePath As String

'MyFilePath = 「HTTP：//服務器/部門/ purchasetracking /」 MyFilePath = Application.Path

MyFileName = "PO_" & Format(Now(), "yyyymmdd-hhnnss") 
    MsgBox (MyFilePath & MyFileName)

ActiveWorkbook.SaveAs文件名：= MyFilePath & MyFileName的'，的FileFormat：= 52 'ActiveWorkbook.SaveAs文件名：= MyFileName的結束如果結束小組

來源

2011-04-27 L01SLan3

我喜歡使用功能GetSetting()和聲明SaveSetting將這些信息保存到註冊表（上次使用的路徑等）。

當從SHP文件夾打開文件時，ActiveWorkbook.Path以「http：//」開頭。在這種情況下，您可以將此路徑從Sub Workbook_Open()過程保存到註冊表中以保留SHP路徑信息。這可以在以後用於向用戶提供良好的路徑/文件名。

希望對你有幫助....祝你好運MikeD

來源

2011-05-02 20:19:52 MikeD

如何從Excel VB中提取我所在的sharepoint文檔庫的URL /路徑？

回答

相關問題