VBA中调用XLA

XLA，在office97－2003中是excel加载宏文件，其功能类似于dll，认为是定义好的库函数，可供人调用。

但是xla文件如何加载和使用成了问题。查阅了很多资料，最后在 http://club.officefans.net/cdb/viewthread.php?tid=81156 这里找到了正确答案，向crdotlin 表示感谢！

（1）编写xla

将以下代码写到xla.xla中：

Function MyXLA(Str As String) As String
    MyXLA = Str & "hi,i'm xla"
End Function

存储为xla.xla

(2)添加xla.xla的引用

在office 2010中，选择File－》Options－》add－ins，选择Excel Add－ins，go

（3）VBA中调用MyXLA（）函数

Sub test()
    myReturn = Application.Run("xla.xla!MyXLA", "hello")
    MsgBox (myReturn)
End Sub

运行结果：

以上可以解决vba中函数未定义的问题。

或者，用下面的这种方法：

让excel处理两次，第一次填入公式，由VBA完成；第二次计算公式，由excel完成