Excel VBA连接SQL遇编译错误：User-defined type not defined求助

这个报错我碰到过好多次啦！出现Compile Error: User-defined type not defined的核心原因是：你的VBA项目没有引用ADODB对应的类库，导致VBA不认识ADODB.Connection、ADODB.Recordset这些自定义类型。下面给你两种解决办法，按需选就行：

方法一：添加ADODB库引用（前期绑定） #

这是最直观的方式，适合自己电脑上长期使用的场景：

• 打开VBA编辑器（按Alt+F11）
• 点击顶部菜单栏的「工具」→「引用」
• 在弹出的窗口里，找到类似Microsoft ActiveX Data Objects 6.1 Library（版本号可能不同，选最高的稳定版本即可），勾选它，然后点击「确定」
• 回到你的代码，重新编译运行，这个报错应该就消失了

方法二：使用后期绑定（无需引用） #

如果你的代码需要分享给其他同事/用户，不想让他们也去手动加引用，可以用后期绑定的方式修改代码：
把原来的变量声明部分：

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset

改成：

Dim cnn As Object
Dim rst As Object
Set cnn = CreateObject("ADODB.Connection")
Set rst = CreateObject("ADODB.Recordset")

这样VBA会在运行时动态创建ADODB对象，不需要提前引用库，兼容性更好。

最后再提个小提醒：确保你的ConnectionString连接字符串是正确的哦，比如连接SQL Server的典型字符串是：

ConnectionString = "Provider=SQLOLEDB;Data Source=你的服务器地址;Initial Catalog=目标数据库名;Integrated Security=SSPI;"

如果是其他数据库（比如Access、MySQL），连接字符串要对应调整~

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