51Testing软件测试论坛

标题: 创建对象，运行错误，求助! [打印本页]

作者: lxh541018 时间: 2013-5-28 17:32
标题: 创建对象，运行错误，求助!
Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")
ExcelSheet.Application.Visible = True
ExcelSheet. ActiveSheet.Cells(1,1).Value = "这是第一行第一列"
ExcelSheet.SaveAs "C:\DOCS\TEST.XLS"
ExcelSheet.Application.Quit

刚接触QTP,想练习下教程中的例子，但在运行时一直会报第2行错误“general run error. line(2):Set ExcelSheet = CreateObject("Excel.Sheet")
”，真心求教大神！

作者: wsryyffs 时间: 2013-5-29 08:51
回复 1# lxh541018

增加：Set ExcelApp = CreateObject("Excel.Application")

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)