Question

对象不支持该属性或方法是怎么回事？

dim exl as Excel.application
dim oBook as new workbook
dim osheet as worksheet
dim i as integer
set exl=createobject("Excel.application")
set obook=exl.workbooks.add
set osheet=obook.worksheets(1)
with osheet
for i=1 to n
.cells(1,i)=a+(b-a)*rnd
next i
end with
exl.saveas "保存路径"
exl.quit

在“exl.saveas "保存路径" ”这一步提示“对象部支持该属性或方法”。“保存路径”格式是“c:\”还是“c:\1.xls”?
在“exl.saveas "保存路径" ”这一步提示“对象部支持该属性或方法”。关键是这一步是不是有什么问题啊 ？

Answer 1

暗淡exl作为excel.application
暗淡obook作为新的作业簿
暗淡osheet作为工作表
暗淡我作为整数
一套exl = createobject （ " excel.application " ）
一套obook = exl.workbooks.add
一套osheet = obook.worksheets （ 1 ）
与osheet
因为我= 1到n
。细胞（ 1 ） = + （二-一） * rnd
接下来，我
结束
exl.saveas "保存路径"
exl.quit

Answer 2

Answer 3

是“c:\1.xls”

Answer 4

当然是后者