clearsight 发表于 2009-2-24 12:17:06

Set Excel=createobject("excel.application") 提示

执行到这段脚本时为啥报   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

dreamever 发表于 2009-2-24 13:10:51

你的代码是没错的,不能创建对象的原因是你传递的参数不正确,检查一下那个url存储的路径是不是正确,检查一下工作表的名称是否正确问题就出在第一行和第二行;
另外,如果参数正确,那么检查一下本机的excel是否正确安装,安装的版本是否为office2007

goona 发表于 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")

dreamever 发表于 2009-2-27 10:22:20

原帖由 goona 于 2009-2-27 10:04 发表 http://bbs.51testing.com/images/common/back.gif
第二行代码,要加引号
Set workbook=Excel.workbooks.open(url)--------Set workbook=Excel.workbooks.open("url")
第三行代码括号中的url和你的excel中的sheet的名称对应了吗?
Set worksheet=workbook.worksh ...
他那个url应该是个变量,那个工作表名的"url"弄不好倒是个常量,工作表名就叫url……
页: [1]
查看完整版本: Set Excel=createobject("excel.application") 提示