调试通过LoadLibrary()加载至Excel的C++ DLL问题

我来帮你把这套C++ DLL导出、Excel VBA调用的流程梳理清楚，分模块给你拆解：

一、编写带导出函数的C++ DLL #

首先是你提到的简单场景，我们需要用__declspec(dllexport)标记要导出的函数，同时指定__stdcall调用约定——这很重要，因为VBA默认使用的就是这个调用约定，能避免调用时的栈错误。

示例代码如下：

__declspec(dllexport) int __stdcall Test() {
    return 123;
}

编译生成MyLibrary.dll后，就可以准备在Excel里调用了。

二、Excel VBA加载DLL并调用函数 #

接下来是VBA部分，需要先声明LoadLibrary（用来手动加载DLL到Excel进程）和我们的Test函数，注意要加上PtrSafe关键字适配64位Excel（32位Excel可以去掉，但保留也兼容）。

完整的VBA代码如下：

Private Declare PtrSafe Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As LongPtr
Private Declare PtrSafe Function Test Lib "MyLibrary.dll" () As Long

Sub executeTest()
    ' 加载DLL到Excel进程
    Dim hLib As LongPtr
    hLib = LoadLibrary("Path\To\MyLibrary.dll")
    
    ' 检查是否加载成功
    If hLib = 0 Then
        MsgBox "DLL加载失败！"
        Exit Sub
    End If
    
    ' 调用Test函数并获取结果
    Dim result As Long
    result = Test()
    
    ' 输出结果，比如写入单元格或者弹窗显示
    MsgBox "Test函数返回值：" & result
End Sub

三、几个关键注意事项 #

• 调用约定必须匹配：C里用__stdcall，VBA里默认就是这个约定，所以不需要额外指定，如果C用了其他约定（比如__cdecl），VBA里要加Alias并按规则处理函数名修饰。
• 位数必须一致：你的DLL编译位数（32/64位）要和Excel的位数完全匹配，否则会加载失败。
• DLL路径要正确：LoadLibrary里的路径可以是绝对路径，也可以是相对路径（如果DLL和Excel文件在同一目录下，直接写文件名即可）。

内容的提问来源于stack exchange，提问作者Bogey