Excel VBA Recordset SQL报错：未提供必需参数的排查疑问

我之前也碰到过类似的ADODB连接Excel时的列查询异常问题，结合你的描述和实战经验，咱们来拆解这个问题：

问题场景回顾 #

你通过ADODB连接Excel工作簿，查询DNS列的SQL语句完全正常，但查询DNK列时却触发报错。重启Excel工作簿后，两个查询又都能正常运行。你的连接配置和SQL语句细节如下：

连接代码

Set cn = CreateObject("ADODB.Connection")
With cn
 .provider="Microsoft.ACE.OLEDB.16.0"
 .ConnectionString="Data Source=" & ThisWorkbook.Path & "\" & ThisWorkbook.Name & ";" & _
 "Extended Properties=""Excel 12.0 Xml;HDR=YES"";"
 .open
End with

可正常执行的SQL

SELECT [DNSHEET$].[DNS] FROM [DNSHEET$]

触发报错的SQL

SELECT [DNSHEET$].[DNK] FROM [DNSHEET$]

注：DNS和DNK都是DNSHEET工作表的合法表头，DNS存储字符串数据，DNK存储1~25000左右的整数。

可能的核心原因 #

1. ACE OLEDB驱动的列类型推断缓存
   ACE驱动默认会根据工作表前8行数据推断列的类型。如果DNK列的前几行曾经存在混合类型（比如一开始是文本后来改成数字，或者有空白单元格），驱动会错误地将列类型判定为字符串，后续实际的整数数据就会引发类型不匹配报错。重启Excel后，驱动重新读取数据，正确推断了列类型，因此临时恢复正常。

2. Excel工作簿的内存缓存不一致
   当工作簿处于打开状态并经过编辑后，内存中的数据结构可能和磁盘文件出现不一致，ADODB连接读取的是旧的缓存结构，导致列识别错误。重启工作簿会清空缓存，让连接读取到最新的文件结构。

3. 列格式或结构异常
   虽然表头名称正确，但DNK列可能存在隐藏的格式问题（比如部分单元格格式被意外修改）、合并单元格或隐藏列，不过这种情况通常重启不会自动修复，可能性相对较低。

排查与解决步骤 #

1. 强制统一列类型读取
   在连接字符串的Extended Properties中添加IMEX=1，强制驱动将混合类型列视为文本，避免类型推断错误：

.ConnectionString="Data Source=" & ThisWorkbook.Path & "\" & ThisWorkbook.Name & ";" & _
"Extended Properties=""Excel 12.0 Xml;HDR=YES;IMEX=1"";"

后续可以在VBA中把读取到的文本转换为整数，不影响数据处理。

2. 检查列的前8行数据一致性
   打开DNSHEET工作表，确认DNK列前8行没有混合类型、空白或异常格式，统一设置为数字格式并填充正确数据。

3. 重置连接而非重启Excel
   不需要每次重启整个Excel，尝试以下操作应急：

   • 先执行ThisWorkbook.Save保存工作簿
   • 关闭当前的ADODB连接对象，重新创建新的连接再执行查询

4. 检查工作表结构
   确认DNK列没有合并单元格、隐藏或保护状态，确保整列格式一致。

5. 更新ACE驱动
   如果使用的是旧版本驱动，可能存在兼容性bug，尝试安装最新的Microsoft Access Database Engine redistributable包，替换旧驱动。

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