У меня есть модуль, который обновляет список SharePoint через VBA, у меня есть пользователи, которые не могут выполнить эту операцию.Пользователи, работающие в Excel 2013, получают сообщение об ошибке во время выполнения.Я не уверен, где ошибка или как я могу переписать свой код для более старых версий.Ошибка выделяет .Open
.Вот мой код VBA:
Dim cnt As ADODB.Connection
Dim rst As ADODB.Recordset
Dim mySQL As String
Set cnt = New ADODB.Connection
Set rst = New ADODB.Recordset
mySQL = "SELECT * FROM [opsmangement] WHERE [branch]= '" & Sheet18.Range("A10").Value & "'"
With cnt
.ConnectionString = _
"Provider=Microsoft.ACE.OLEDB.12.0;WSS;IMEX=0;RetrieveIds=Yes;DATABASE=http://us.cs.us-dns.com/sites/downtown/;LIST={21B3D896-995F-461F-BDB8-F8DB41128229};"
.Open
End With