vba 自动导入excel报表遇到的问题及解决方法

问题：

1：找不到数据源———————————————— 安装 32 位odbc驱动（与excel相匹配） ，repair

2：类型未定义 ————————————————工具-》引用-》Microsoft AcitviteX  Data Objects 2.8

3：rs.recordcount 总是-1————————————rs.open 前添加代码 “Rs.CursorLocation = adUseClient”