最专业的脚本、辅助学习平台,易语言培训/C++教程学习基地
查看: 5665|回复: 6

关于易语言读取excel电子表格内容问题解决经验

[复制链接]

该用户从未签到

发表于 2018-10-9 02:46:03 | 显示全部楼层 |阅读模式
  昨晚碰到了一个问题
  在用易语言的两个组件对excel电子表格的内容进行读取和写入操作时,内容就是读不出来,先贴一下源码
.版本 2
.支持库 spec
.支持库 eExcel2000

.子程序 _按钮_修改ip_被单击
.局部变量 记录数, 整数型
.局部变量 u, 整数型’记录标记

调试输出 (“是否创建:”, Excel程序1.创建 ()) ' 先创建控件,必不可少
调试输出 (“是否置成功:”, Excel工作簿1.置程序 (Excel程序1))  ' 然后把excel程序置,必不可少
Excel工作簿1.激活工作簿 () ' 再激活工作簿,必不可少
' 这三条命令必不可少
调试输出 (“是否已打开:”, Excel工作簿1.打开 (取运行目录 () + “\ip数据.xls”))  ' 打开对应的表格,路径一定要写对

Excel工作簿1.表格序号 = 1 ' 设置要操作的表格,excel默认是三个表格,对应分别是1,2,3
u = 2 ' 为什么先赋值为2,因为表格中的第一行一般都是数据的名称,而不是数据,比如:姓名、年龄、性别等
Excel工作簿1.首单元格 = “A” + 到文本 (u)’在读取表格内容时,需要先指定读取那一个单元格坐标即“A2”
Excel工作簿1.尾单元格 = “B” + 到文本 (u)’在读取表格内容时,需要先指定读取那一个单元格坐标即“A2”
调试输出 (Excel工作簿1.内容)’调试输出A2单元格的内容
.判断循环首 (Excel工作簿1.内容 ≠ “”)  ' 判断记录是不是空,如果为空说明已经到了记录最后
    Excel工作簿1.首单元格 = “A” + 到文本 (u)
    Excel工作簿1.尾单元格 = “A” + 到文本 (u)
    u = u + 1  ' 到下条记录
    记录数 = 记录数 + 1  ' 记录累计数
.判断循环尾 ()
调试输出 (“记录数:”, 记录数)


此源码可读取电子表格内容,并且获取有多少条记录
以上代码都完全没问题,但是调试输出后,内容就是读不出来
度娘上都找啊找,找了个遍,代码上都大同小异。
睡了一晚,今天上午突然一想,是不是excel文件本身的原因
于是,把excel2007的文件格式换成了excel2003的格式。
一调试,成功了!
QQ图片20181009104238.png
QQ图片20181009104352.png
必须要是2003版本以后的才行!
  • TA的每日心情
    奋斗
    昨天 13:34
  • 发表于 2018-10-9 02:59:52 | 显示全部楼层

    我看不错噢 谢谢楼主!天野学院越来越好!
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-10-26 13:31
  • 发表于 2019-10-26 13:35:57 | 显示全部楼层
    啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊
    回复

    使用道具 举报

  • TA的每日心情
    开心
    2019-10-26 13:31
  • 发表于 2019-10-26 13:36:25 | 显示全部楼层
    a啊a啊a啊a啊a啊a啊a啊a啊a啊a啊a啊a啊a啊
    回复

    使用道具 举报

  • TA的每日心情
    萌哒
    前天 09:31
  • 发表于 2020-5-26 12:07:15 | 显示全部楼层

    感谢楼主的无私分享!要想天野学院好 就靠你我他
    回复

    使用道具 举报

  • TA的每日心情
    萌哒
    前天 09:31
  • 发表于 2020-6-5 18:51:23 | 显示全部楼层
    楼主发贴辛苦了,谢谢楼主分享!我觉得天野学院是注册对了!
    回复

    使用道具 举报

    该用户从未签到

    发表于 2021-11-3 04:30:39 | 显示全部楼层

    支持,不错。6666666666666666666
    回复

    使用道具 举报

    懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    关闭

    站长推荐上一条 /4 下一条

     
     
    工作时间:
    9:00-22:00
    天野学院2群:648301976(建议加好友再发信息,有时候直接发消息可能收不到))
    快速回复 返回顶部 返回列表