我想在自定义函数中调用DLL，发现无法成功。　[金字塔]

自定义了一个函数BI（）

Function Bi(Formula,H,L)

 Set History = Formula.ParentGrid.GetHistoryData()
 dim MyAddin
 
 set myaddin=createobject("MyActiveXDemo.VBSAddin")
 'bi=myaddin.mytest(H)
 
 End Function

执行到 set myaddin=createobject("MyActiveXDemo.VBSAddin")行时报错。

这个DLL是用VB生成的。代码如下：

Function VBSAddin(ByRef H As Double) As Double

VBSAddin = 2

End Function

报错原因是不能创建对象，错误代码429.

名字写错了，改了以后就能调用了。我的DLL是activeX的。

不过，VBS是不是不支持数组传参啊？好像无论怎么改都不行。

数组暂时不行

那有无办法批量处理序列模式下的数据序列呢？