Vi2>

ASA>>[propput, id(diCurrentColName), helpstring("property CurrentColName")] HRESULT CurrentColName([in] BSTR newVal);
Vi2>

Vi2>Покажи код Put_CurrentColName и как работаешь с принимаемой строкой. И что за ошибка.

Код корректный. Из ActiveX Control Test Container все прекрасно работает. К тому же дело до вызова не доходит.Падает в тот момент, VBA пытается отобразить свойства в своем окне, Оно обычно находится в левом нижнем углу экрана. Такое впечатление, что VBA не нравится то, что находится в библиотеке типов, но что именно — не пойму.