使用VBA的訪問從SharePoint

Question

籤一個Excel文檔我有一個相當奇怪的情況，下面的代碼可以成功簽出從SharePoint到Excel文件...

Private sub checkoutfromSP() 
Dim loc as String 
loc = "Location" 

if Workbooks.CanCheckOut(loc) = true then 
Workbooks.CheckOut loc 
end if 

然而，這如何轉化成訪問？使用以下代碼時，我總是收到錯誤「此文檔無法檢出」？

Dim objXL as Excel.Application 
Dim loc as String 

loc = "Location" 
objXL = new Excel.Application 

if objXL.Workbooks.CanCheckOut(loc) = True then 
objXL.Workbooks.CheckOut loc 
end if 

原因通過接入結賬是存在需要從Access下降到Excel數據幾件，但作爲Excel文件在SharePoint我需要簽入/籤提交更改。

Answer 1

公開賽檢查出來，它應該爲你工作之前，你的Excel實例文檔：

Dim objXL As Excel.Application 
Dim objWB As Excel.Workbook 'NEW 
Dim loc As String 

loc = "Location" 

Set objXL = New Excel.Application 'Make sure you use Set here 

If objXL.Workbooks.CanCheckOut(loc) = True Then 
    Set objWB = objXL.Workbooks.Open(loc) 'NEW 
    objXL.Workbooks.CheckOut loc 
End If 

當您檢查工作簿背面與線objWB.CheckIn，Excel會自動關閉工作對象。