Вам необходимо создать фальшивый xlcall32.dll , поместить его в тот же каталог, что и ваш XLL (не помещайте собственный файл xlcall32.dll в Excel в 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-файл с именем xll-dll.xll с функцией, которая вызывается (для определения имен экспортируемых функций используйте «зависящий от.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".