[已解决]在有其它Excel文件打开的情况下，这个ADO连接为何不正常？

lzongbnew

我通过Access调用Excel文件（带VBA），调用时如果没有其它Excel文件打开则一切OK，如果有其它Excel文件打开，则被调用的Excel文件就会凭空多出来一个副本。
请诸位老师指教，如何才能不要这个“副本”？

ly

要增加一个判断，如果有excel文档打开的则使用：
    Set xlApp = GetObject(, "Excel.Application")

top_sf

ly 发表于 2018-11-18 13:26
要增加一个判断，如果有excel文档打开的则使用：
    Set xlApp = GetObject(, "Excel.Application")

厉害

lzongbnew

ly 发表于 2018-11-18 13:26
要增加一个判断，如果有excel文档打开的则使用：
    Set xlApp = GetObject(, "Excel.Application")

确实解决了问题，非常感谢！但随之产生了一个新的问题，就是accdb运行时没问题，但编译为accde后则无法运行。请拨冗指点！

lzongbnew

问题解决了。偶然发现把数据库用更高版本的Access（我阿里云上安装的是Office2010，本机是Office2016）压缩修复一下就没问题了。谢谢各位的帮助。