请教 1004 应用程序定义或对象定义错误

吉　发表于：2019-07-08 15:33:17 　

复制

在导出记录到EXCEL时出现这个错误，偶尔发生的，一般记录行多的时候会发生，记录少没发生，

出了错误，点调试在红色箭头处停住，按F8逐语句执行可以继续执行完，成功导出。

按照网上的设置excel的安全设置等无效。

试了其他一些方法也无效。不知道是什么原因。主要是有时又能正确执行。请教有人知道这个问题吗。

Top

张志发表于：2019-07-09 09:55:24

逐行调试一下代码。

如何调试代码可参考第17课：https://m.qlchat.com/wechat/page/channel-intro?channelId=290000432036562

Top

吉发表于：2019-07-09 14:52:11

问题已经解决了，感谢张志站长的帮忙。

在把记录传递给单元格的时候加上转换函数就一定不会出错。如果不加就偶尔会出错，真是奇怪。

 objApp.Sheets("Sheet1").Range("b" & h) = CStr(rst!品名规格)
     
      objApp.Sheets("Sheet1").Range("c" & h) = CStr(Nz(rst!客户编号))
       objApp.Sheets("Sheet1").Range("d" & h) = CStr(rst!颜色)
       objApp.Sheets("Sheet1").Range("e" & h) = CLng(rst!数量)

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

请教 1004 应用程序定义或对象定义错误