运行时错误 80004005 无效参数 ADODB SharePoint 列表使用 VBA答案

【问题标题】：Run-time error 80004005 Invalid argument ADODB SharePoint list using VBA运行时错误 80004005 无效参数 ADODB SharePoint 列表使用 VBA
【发布时间】：2017-07-19 18:08:02
【问题描述】：

您好，我有如下代码，当我运行它时，在下面标记的行中出现错误。错误是“运行时错误 80004005 无效参数”。我一直在寻找一些解决问题的技巧，但没有一个能帮助我。感谢您的任何建议。

Sub TestInsertToSharepoint()

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sConn As String
Dim sSQL As String



sDEMAND_ROLE_GUID = "guid"
sSHAREPOINT_SITE = "sharepointsite"


sConn = "Provider=Microsoft.ACE.OLEDB.12.0;WSS;IMEX=1;RetrieveIds=Yes;" & _
"DATABASE=" & sSHAREPOINT_SITE & ";" & _
"LIST=" & sDEMAND_ROLE_GUID & ";"

Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

With cn
.ConnectionString = sConn
.Open <--------- here I got error
End With

sSQL = "INSERT INTO tblAddingData (Title) VALUES ('FIRSTEDIT')"

rs.Open sSQL, cn



End Sub

【问题讨论】：

标签： vba sharepoint adodb

【解决方案1】：

我想我已经找到了问题所在。有两种方法可以解决这个问题：

将 Excel 文件保存在 One Drive 中，连接字符串将停止抛出错误。奇怪的是它不是从本地文件夹运行，而是从 OneDrive 文件夹运行。
从 Excel 2013 运行它。

如果有帮助请告诉我。

【讨论】：