Поймать сообщение об ошибке из SQL Server в VBA в Excel

Я делаю макрос Excel для того, чтобы автоматизировать некоторые запросы, которые в конечном итоге я запускаю в SQL Server. Моя проблема в том, что я не знаю, как сервер мог предупредить Excel, если запрос не был выполнен успешно.

Например, я импортирую файл, и нет синтаксической ошибки, но это может привести к ошибке, если оператор массовой вставки не установлен правильно. Для соединения SQL я использую следующее:

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sConnString As String

' Create the connection string.
sConnString = "Provider=SQLOLEDB;Data Source=localhost;" & _
              "Initial Catalog=" & MyDatabase & ";" & _
              "Integrated Security=SSPI;"

' Create the Connection and Recordset objects.
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.Open sConnString

Set rs = conn.Execute(Myquery)

Если у меня возникает синтаксическая ошибка во время компиляции кода, он останавливается, и это хорошо. Но если у меня есть другая проблема, e. г. имя базы данных не подходит, таблица уже существует, затем программа запускается без ошибок, я могу определить это только при проверке в SQL Server. Я действительно хочу как-то узнать, привел ли выполнение запроса к ошибке, а затем записать какое-нибудь предупреждающее сообщение в мой макрос. Как я могу это сделать?

Каждая помощь очень ценится!

Ответы на вопрос(2)

Ваш ответ на вопрос