Доброго дня господа !

Библиотека DLL (Delphi) преобразовала ADODB.Recordset в OLEVariant, этот тип принят функцией VBA и вернул тип Variant

[ Public | Private ] Declare FunctionnameLib "libname" [ Alias "aliasname" ] [ ( [ arglist ] ) ] [ As type ] as Variant
Данные видны в Debug-ере.

Вопрос
Как в VBA осуществить приведение типов, сделать ADODB.Recordset и стандартными методами
пройтись по массиву (while Rs.EOF, Rs.Next т.д.)

Dim Rs as ADODB.RecordSet, V as Variant
V = myFunction(.......) 'возврат Variant (recordset из DLL)
Rs = V ?????????????? Как преобразовать тип

Заранее благодарен !