51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

查看: 3240|回复: 3
打印 上一主题 下一主题

[原创] Set Excel=createobject("excel.application") 提示

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2009-2-24 12:17:06 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
执行到这段脚本时为啥报   ActiveX部件不能创建对象:"excel".application的错?我已经启动ActiveX插件了
Set Excel=createobject("excel.application")
Set workbook=Excel.workbooks.open(url)
Set worksheet=workbook.worksheets("url")


RowCount=workSheet.UsedRange.Rows.Count
worksheet.Cells(9,2).value="wo"
workbook.save
workbook.close
Excel.quit
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2009-2-24 13:10:51 | 只看该作者
你的代码是没错的,不能创建对象的原因是你传递的参数不正确,检查一下那个url存储的路径是不是正确,检查一下工作表的名称是否正确问题就出在第一行和第二行;
另外,如果参数正确,那么检查一下本机的excel是否正确安装,安装的版本是否为office2007
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2009-2-27 10:04:10 | 只看该作者
第二行代码,要加引号  
Set workbook=Excel.workbooks.open(url)--------Set workbook=Excel.workbooks.open("url")
第三行代码括号中的url和你的excel中的sheet的名称对应了吗?
Set worksheet=workbook.worksheets("url")
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2009-2-27 10:22:20 | 只看该作者
原帖由 goona 于 2009-2-27 10:04 发表
第二行代码,要加引号  
Set workbook=Excel.workbooks.open(url)--------Set workbook=Excel.workbooks.open("url")
第三行代码括号中的url和你的excel中的sheet的名称对应了吗?
Set worksheet=workbook.worksh ...

他那个url应该是个变量,那个工作表名的"url"弄不好倒是个常量,工作表名就叫url……
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-5-24 16:50 , Processed in 0.081355 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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