TC官方合作论坛

标题: 为什么我根据版主的教程读写EXCEL代码，实际操作报错了 [打印本页]

作者: 亚太丶 时间: 2014-8-9 17:57
标题: 为什么我根据版主的教程读写EXCEL代码，实际操作报错了
[img]file:///C:\Users\Administrator\AppData\Roaming\Tencent\Users\415244214\QQ\WinTemp\RichOle\}([4{BO3%)0M`}S1K(CP1{V.jpg[/img]错误信息如图，那个xapp为null，后续的操作就自然不能下去了
求高手解答下，万分感谢！

作者: ljc1207 时间: 2014-8-9 18:57
你这样写
xlspath=help.getrcpath("rc:工作簿.xls")
xlApp =com("Excel.Application")
xlBook = xlApp.Workbooks.Open(xlspath)
xlApp.ActiveWorkbook.name()
xlApp.ActiveSheet.name()

for(i=0;i<成员数;i++)
xlw=xlApp.Range(wte[i][1],wte[i][1])
xlw.Value=wte[i][0]
endfor

xlw=null
ret=xlBook.Save()
ret=xlBook.Close()
ret=xlApp.WorkBooks.Close()
ret=xlApp.Quit()
xlBook=null
xlApp=null

help.cmd(xlspath,真)

作者: ljc1207 时间: 2014-8-9 18:58
TC 对EXCEL 的sheet 支持不太好你试试懒人插件看觉得好给个采纳哦

作者: 亚太丶 时间: 2014-8-9 19:00

ljc1207 发表于 2014-8-9 18:57
你这样写
xlspath=help.getrcpath("rc:工作簿.xls")
xlApp =com("Excel.Application")

你的答案没有回答我的问题哦
xlApp =com("Excel.Application")

我也是根据教程来的，就为什么这个xlApp 会是null，后面的操作自然就报错了呢？？？

作者: ljc1207 时间: 2014-8-9 19:32
你本机的excel是什么版本精简的不行

作者: 亚太丶 时间: 2014-8-9 19:33

ljc1207 发表于 2014-8-9 19:32
你本机的excel是什么版本精简的不行

不是精简的，是offers2007

作者: YGV 时间: 2014-8-9 19:40
TC主要用来做游戏辅助的,谁还研究这个东西哦

作者: ljc1207 时间: 2014-8-11 10:29

亚太丶发表于 2014-8-9 19:33
不是精简的，是offers2007

我这里用office2003 是没问题的你要么试下懒人插件在VIP里面有反正免费的你试下效果比本身的好很多

作者: 学习者爱学习 时间: 2014-8-11 10:47
好好学习

作者: sszzsy 时间: 2014-8-28 14:48

空间 damo
//默认空间
变量姓名2,身份证号3,n,s1
db=com("DBSoft.DBSoft_office")
wj=com("DBSoft.DBSoft_File")

//开始按钮_点击操作

功能开始_点击()
是否成功=辅助.是否注册("DBSoft.DBSoft_office")

如果(!是否成功) //如果没有注册
      是否成功=辅助.注册插件("rc:DBSoft.dll",真)
      如果(是否成功)          //判断是否成功
         辅助.消息框("插件注册成功，重启程序")//不成功就开始注册大漠
         辅助.退出()
      否则
         辅助.消息框("插件注册失败")
      如果结束
如果结束
//线程句柄=线程.开启("damo.取值计算","")

n=编辑框.获得文本("编辑框33")  //获取起时行数值
文件路径=wj.GetSystemFolder(3)&"123.xls"  //获取系统桌面123.xls的路径

打开表格=db.OpenExcel(文件路径,"Sheet1")
如果(打开表格!=1) //判断文件存在
      辅助.消息框("打开表格失败","信息")
      辅助.退出()
如果结束

读取内容=db.ReadOpenExcel(文件路径,"sheet1",n,2) // 判断是否有空行

//辅助.消息框(读取内容)                         //测试语句
控件.有效("开始",假)
控件.有效("退出",真)

辅助.等待(5000)

循环(读取内容!="")

      姓名2=db.ReadOpenExcel(文件路径,"sheet1",n,2)//获取主场队名
      身份证号3=db.ReadOpenExcel(文件路径,"sheet1",n,3)//获取比赛比分
      标签.设置文本("标签10",姓名2)
      标签.设置文本("标签11",身份证号3)
   s1=s1+1  //累计读取行数
   n=n+1
   循环结束
   编辑框.设置文本("编辑框2",s1&"行") //输出S1结果
   控件.有效("开始",真)
db.CloseExcel(文件路径,0) //关闭excel (按照所给函数写的但是不怎么好使)
功能结束
功能退出_点击()

db.CloseExcel("123.xls",0)
辅助.等待(200)
辅助.退出()

功能结束
空间结束

用的是大兵的插件读的是桌面的123.xls

作者: qiufeng1163 时间: 2015-1-20 15:42
大兵的插件我用了一下，按照10#楼大神的代码，可以读取了，但是只能读取第一行第一列的那个单元格，不知道为什么？

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)