在VB6里怎样调用VBA里的函数？

比如在Excel的VB编辑器里自己写了一个函数叫“somefunc”，然后我想在一个VB的程序里定义一个Excel.Application对象打开那个Excel文件，然后调用somefunc函数。如何做？

Dim xlApp As New Excel.Application
    Call xlApp.Workbooks.Open(App.Path & "\test.xls")
    xlApp.Run "test.xls!ThisWorkbook.somefunc"
    xlApp.Quit