Foxtable(狐表) → 用户栏目 → 专家坐堂 → XLS导出插入图片时,遇坏图错误


  共有4207人关注过本帖树形打印复制链接

主题：XLS导出插入图片时,遇坏图错误
帅哥哟，离线，有人找我吗？
realredred
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：488 积分：3358 威望：0 精华：0 注册：2013/4/17 21:14:00 		XLS导出插入图片时,遇坏图错误  发帖心情 Post By：2014/2/12 11:22:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：未标题-1 拷贝.jpg
图片点击可在新窗口打开查看

 

 

在导出XLS时插入图片,因為坏图而出现上述错误,而使整段代码停止了运行,由于图库里的图片很多,要续一查核那个坏图不实际
能不能检测出如遇坏图 则跳过 继续接著的代码?


图片插入路径 代码如下
Sheet(1,1).Value =   New XLS.Picture(GetImage( "Y:\IMG\" & pic & ".jpg" ),3,3,219,162)
 回到顶部
帅哥哟，离线，有人找我吗？
realredred
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：488 积分：3358 威望：0 精华：0 注册：2013/4/17 21:14:00 		CSV格式及中文字乱码问题  发帖心情 Post By：2014/2/12 11:58:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：未命名.jpg
图片点击可在新窗口打开查看
坏图是像这样的

在XLS是能夠插入

但以VBA 或 狐表就出錯

 

我知道vba如何排錯

       用 On Error Resume Next 可以跳过坏图

但狐表就不懂

 

狐狸的代码无效,仍然出现錯误
 回到顶部
帅哥哟，离线，有人找我吗？
realredred
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：488 积分：3358 威望：0 精华：0 注册：2013/4/17 21:14:00 		CSV格式及中文字乱码问题  发帖心情 Post By：2014/2/12 12:05:00 [显示全部帖子]

以下是引用Bin在2014-2-12 11:24:00的发言：
在这句代码前加入一句

messagebox.show(pic) 这样不就可以知道那个图片有问题了么

BIN老師,图片过千的

这样跳出对话框会点到手软图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
realredred
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：488 积分：3358 威望：0 精华：0 注册：2013/4/17 21:14:00 		CSV格式及中文字乱码问题  发帖心情 Post By：2014/2/12 12:31:00 [显示全部帖子]

已查出是哪个图片有问题(花了一小时....)

图片损坏有很多原因,如果每次出錯都得花时间去查,浪费时间

但如果狐表真的不能遇錯跳过,

也只能续一查图了,....
 回到顶部
帅哥哟，离线，有人找我吗？
realredred
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：488 积分：3358 威望：0 精华：0 注册：2013/4/17 21:14:00 		CSV格式及中文字乱码问题  发帖心情 Post By：2014/2/12 12:54:00 [显示全部帖子]

慘了,目测查的图都查了

仍出现这个问题.

有何方法再排查?(肯定是GetImage问题,因为把这段代码刪了就完全沒事)
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 5 次数据查询