开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

楼主: ttt0410
收起左侧

[易语言模块源码] 易语言操作EXCEL的模块2

  [复制链接]
发表于 2019-6-1 02:11:17 | 显示全部楼层   广东省茂名市
本帖最后由 dhbdjl 于 2019-6-1 02:58 编辑

多线程创建问题总算解决了,用精易模块“线程_启动2”启动子程序,再在自编译子程序首部加入“线程_初始化COM库 () ”子程序,完美运行,感谢版主分享~~~
在此也分享下测试例子,希望可以帮到有需要的人~~
OFFICE2007读取例子:读EXCEL sheel1;第1,2,4列;第2。。。。。101行的表格数据
.版本 2
.子程序 测试读EXCEL, , ,

.局部变量 EX , 第三方_EXCEL类, , , 第三方编译类模块
.局部变量 EX行 , 整数型, , ,
.局部变量 变量1 ,文本型, , ,
.局部变量 变量2 ,文本型, , ,
.局部变量 变量3 ,文本型, , ,

.版本 2
        线程_初始化COM库 ()  ' 因多线程进行EXCEL操作时异常,加入子程序后才能稳定运行   
        EX行=1
        .如果 (EX.创建 () = 真)
            输出调试文本 (“ex创建成功”)
        .否则
            输出调试文本 (“ex创建失败”)
        .如果结束
        EX.打开 (“E:\**.xlsx”) '打开的excel文件路径
        EX.可视 (假) '(真)为可见
        计次循环首(100,)     
        EX行 = EX行 + 1
        变量1 = EX.读单元格数据 (1, EX行, 1).取文本 ()
        变量2 = EX.读单元格数据 (1, EX行, 2).取文本 ()
        变量3 = EX.读单元格数据 (1, EX行, 4).取文本 ()
        输出调试文本 (变量1 , 变量2, 变量3)
        计次循环尾()
        EX.关闭 ()




回复 支持 反对

使用道具 举报

发表于 2019-5-31 04:39:58 | 显示全部楼层   广东省茂名市
多线程创建时,有的时候可以创建成功,有的时候创建失败,有办法解决吗?
回复 支持 反对

使用道具 举报

发表于 2019-5-30 19:47:37 | 显示全部楼层   江苏省常州市
真是我需要的,非常感谢
回复 支持 反对

使用道具 举报

结帖率:100% (4/4)
发表于 2019-5-30 14:58:19 | 显示全部楼层   广东省东莞市
感谢分享,下载学习
回复 支持 反对

使用道具 举报

发表于 2019-5-16 22:07:32 | 显示全部楼层   河北省沧州市
谢谢楼主分享
回复 支持 反对

使用道具 举报

发表于 2019-5-15 08:50:57 | 显示全部楼层   湖北省武汉市
下载一下,一枚金币,评论一下,一枚金币
回复 支持 反对

使用道具 举报

签到天数: 2 天

发表于 2019-5-14 09:46:16 | 显示全部楼层   江苏省常州市
                  
回复 支持 反对

使用道具 举报

发表于 2019-5-6 15:50:54 | 显示全部楼层   广东省惠州市
支持学习学习
回复 支持 反对

使用道具 举报

结帖率:95% (38/40)
发表于 2019-4-21 21:27:24 高大上手机用户 | 显示全部楼层   四川省成都市
ttt0410 发表于 2018-3-24 20:34
这里也加上例子吧,上一贴本来有的
首先将模块加载(自己将源码编译)
然后定义一个变量,例如“E”,类 ...

请问大佬,可以插入分页符吗?怎么使用?
回复 支持 反对

使用道具 举报

签到天数: 10 天

发表于 2019-4-18 00:17:04 | 显示全部楼层   吉林省长春市
这个必须顶
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表