Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL - VB

Формулировка задачи:

Приветствую!
Прошу помощи, сам не смог не найти ответа на форуме не разобраться.
Проблема следующая: Необходимо в Excell получить результат выполнения хранимой процедуры от MS SQL.
Результат запроса на базе SELECT передаётся на ура но вот результат запроса с запуском хранимой процедуры никак не хочет работать
Код процедуры [CheckRuleList] заканчивается строкой:

SELECT @ErrorText AS RCH

и возвращает где @ErrorText простая строковая переменная
Макрос В EXCELL:

Dim cn As ADODB.Connection
Dim rst As ADODB.Recordset

cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=LotsiaDB;Data Source=SERVERSQL" 'строка соединения
cn.Open
rst.Open "SELECT testC FROM [LotsiaDB].[LSDBO].[TestTable]", cn 'Вот так работает

'rst.Open "EXEC [ServerSQL].[LotsiaDB].[LSDBO].[CheckRuleList] 100008615600086,100000346000055", cn 'а вот так не работает

Sheets("Лист1").Range("A1").CopyFromRecordset rst
rst.Close
cn.Close

Set rst = Nothing
Set cn = Nothing

End Sub

когда в макросе прописываю

rst.Open "EXEC [ServerSQL].[LotsiaDB].[LSDBO].[CheckRuleList] 100008615600086,100000346000055", cn 'а вот так не работает

При попытке выполнения VBA выдаёт ошибку "Операция не допускается, если объект закрыт" на строку:

Sheets("Лист1").Range("A1").CopyFromRecordset rst

Подскажите пожалуйста, что не так у меня в коде.

Решение задачи: «Как получить в переменную результат выполнения хранимой процедуры лежащей в базе на MS SQL»

textual
                            Листинг программы 
                        
                            rst.NextRecordset