在红尘如烟的(【access源码示例】导入导出系列--Excel固定格式的订单导入导出\导出到Excel模板示例)过程中,导出到Excel的时候出现了,下面的错误提示,(图一)
再按的时候又出现了以下提示,
再点击就是不断的循环这个提示,而且不能正常退出,只能使用windows的任务管理器把它关闭,而且还把excel程序卡在任务管理器里面了,要手动清理掉。
使用导入操作的时候也是出现了图一的提示,然后就跳到下面的画面,
完全挂掉了。把例子发到同事的电脑上使用没有问题。再然后到网站搜索(www.accessoft.com)搜索到一个麦田写的解决方法: VBA报“自动化(Automation)错误”的解决方法)这个链接。
然鹅,还是没有解决,百思不得其姐,进入静坐反思己过的阶段。
问题分析:
测试运行只是Access程序 ,没有问题,但是只要关联到Excel的就出问题了。初步判断那就是excel有问题。使用excel vba 测试程序,也能正常运行 。
突然间想起麦田以前写的一个文章,是关于福昕pdf阅读器加载到excel里面 导致不能正常导入导出的示例,刚好我的电脑也是安装了福昕pdf阅读器,估计是这个问题造成的,说干就干,打开excel 进行设置。把不是Excel的控件都取消掉。
关闭Excel,重新打开Access 重新运行(【access源码示例】导入导出系列--Excel固定格式的订单导入导出\导出到Excel模板示例)都能正常使用,看来就是因为第三方插件造成这个故障。
另外在下面这个示例也是出现故障提示:
【Access源码示例】导入系列-Excel之ADO记录集方法
http://www.accessoft.com/article-show.asp?id=18518
所以在进行跨软件操作的时候不但要检查Access 有没有问题,调用的软件也要检查才行。
图 示:
福昕阅读器或福昕PDF编辑器引起Access导入导出Excel问题的解决方法,错误#-2147417851 SysFrmImportFromExcelText:Sub SelectExcelFile()自动化(Automation)错误的解决方法,错误#-2147417851 SysFrmImportFromExcelText:Sub SelectExcelFile()方法'Open'作用于对象'Workbools'时失败的解决方法
http://www.accessoft.com/article-show.asp?id=18324