Здравствуйте!
Делаю раз: File->New->ActiveX->ComObject (TTest).
Делаю два: в редакторе библиотеки типов создаю метод Metod1, возвращающий VARIANT.
Делаю три: Строитель генерит код -
Код:

/////////////////////////////////////////////////////////////////////////////
// TTTestImpl

TVariant STDMETHODCALLTYPE TTTestImpl::Method1()
{
return "test";
}


Делаю четыре: компилирую, регистрирую - OK!
Делаю пять: в Excel ставлю ссылку и пишу код -
Код:

Dim obj as TTest 'OK
Set obj = new TTest 'OK
var = obj.Method1() 'OK, но var почему-то empty
Set obj = Nothing 'ERROR - Excel допустил ошибку "Нет данных" и будет закрыт...


Что это и куда рыть???
Снова спасибо!