以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  出错捕捉  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128301)

--  作者:hpbcfmqr
--  发布时间:2018/12/3 14:24:00
--  出错捕捉
excel表格中有错误,例如日期出错,打开时出错,程序不能继续下去,如何捕捉是什么错误呢
--  作者:hpbcfmqr
--  发布时间:2018/12/3 14:32:00
--  
 Dim Bookx As New XLS.Book(”C:\\fakepath\\75、钢筋11-4cm.xls“) 就出错
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:75、钢筋11-4cm.xls



--  作者:hpbcfmqr
--  发布时间:2018/12/3 14:55:00
--  
在线等老师帮解决这样的错误
--  作者:有点甜
--  发布时间:2018/12/3 15:12:00
--  

没办法,这个excel文件无法这样打开。

 

你尝试用vba处理吧 http://www.foxtable.com/webhelp/scr/2121.htm

 


--  作者:hpbcfmqr
--  发布时间:2018/12/5 20:53:00
--  
用vba处理,运行是相当的慢,能不能捕捉这种错误然后再用vba处理,要不然我还不如在excel中编程,现在办公软件中excel用得最多,应想办法与excel相应才是
[此贴子已经被作者于2018/12/5 20:54:58编辑过]

--  作者:有点甜
--  发布时间:2018/12/5 21:19:00
--  

加入try catch

 

try
    Dim Bookx As New XLS.Book("d:\\123.xls")
catch ex As exception
    msgbox(ex.message)
    msgbox(123)
End try