Ошибка при обновлении соединения OLEDB - «Метод обновления объекта WorkbookConnection Failed» - PullRequest
0 голосов
/ 02 мая 2019

У меня возникла проблема с созданной мной книгой, в которую встроен код VBA для обновления соединения OLEDB с SQL Server. Все это прекрасно работает на компьютерах с Excel 2013, но у меня есть пользователь в Excel 2010, и он не работает на их компьютере.

Сообщение об ошибке:

"Run time error: '-2147417848 (80010108)': Method 'Refresh' of object 'WorkbookConnection' failed"

Код:

With ActiveWorkbook.Connections("worksheet").OLEDBConnection
.Connection = Array( _
        "OLEDB;Provider=SQLOLEDB.1;Persist Security Info=True;User ID=User;Password=Password;Initial Catalog=InitialTable;Data Source=ServerName;" _
        , _
        "Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=A1234;Use Encryption for Data=False;Tag with " _
        , "column collation when possible=False")
.SavePassword = True
.CommandText = "select * from query"

ActiveWorkbook.Connections("worksheet").Refresh
End With

Любая помощь или предложения приветствуются.

Спасибо.

...