你需要创建一个fake xlcall32.dll,把它和你的XLL放在同一个目录下(不要把excel自己的xlcall32.dll放在PATH里)。这是一些代码:
# include <windows.h>
typedef void* LPXLOPER;
extern "C" void __declspec(dllexport) XLCallVer ( ) {}
extern "C" int __declspec(dllexport) Excel4 (int xlfn, LPXLOPER operRes, int count,... ) { return 0; }
extern "C" int __declspec(dllexport) Excel4v(int xlfn, LPXLOPER operRes, int count, LPXLOPER far opers[]) {return 0;}
现在假设我有一个名为 xll-dll.xll 的 XLL,其中有一个名为(使用“depends.exe”来找出导出函数的名称)的函数 xlAdd 很好地添加了两个双精度数:
extern "C" __declspec(dllexport) XLOPER * __cdecl xlAdd(XLOPER* pA, XLOPER* pB);
下面的代码调用它:
# include <windows.h>
# include <iostream>
// your own header that defines XLOPERs
# include <parser/xll/xloper.hpp>
// pointer to function taking 2 XLOPERS
typedef XLOPER * (__cdecl *xl2args) (XLOPER* , XLOPER* ) ;
void test(){
/// get the XLL address
HINSTANCE h = LoadLibrary("xll-dll.xll");
if (h != NULL){
xl2args myfunc;
/// get my xll-dll.xll function address
myfunc = (xl2args) GetProcAddress(h, "xlAdd");
if (!myfunc) { // handle the error
FreeLibrary(h); }
else { /// build some XLOPERS, call the remote function
XLOPER a,b, *c;
a.xltype = 1; a.val.num = 1. ;
b.xltype = 1; b.val.num = 2. ;
c = (*myfunc)(&a,&b);
std::cout << " call of xll " << c->val.num << std::endl; }
FreeLibrary(h); }
}
int main()
{test();}
我的 exe 确实有效(令我惊讶的是),并按预期输出 3。您必须对 XLL 对参数的实际期望有所了解。如果它分配了一些内存,你必须检查#define xlbitDLLFree 0x4000
在您的 XLOPER c->type 上设置,然后回调“xlAutoFree”。