对象变量或WITH变量未设置。

[sword281]

以前用VB写了个小程序调用office97中的Excel生成一个新的Excel表
Dim Excel as Excel.Application
Set Excel97=new Excel.Application
....
在Excel97中编译通过能运行且正确，现在在Excel2003中编译运行时，在Set Excel97=new Excel.Application 这一行提示对象变量或WITH变量未设置,引用中也将Microsoft Excel11 object Lib 这一项钩上了，不知是什么原因，请各位大侠帮帮忙！

[lostbyte2006]

忘了03是不是支持set这个关键字，我用的05可以直接dim excel05 as New Excel.Application.

[东方之珠]

同意3楼

[jhone99]

Dim Excel as Excel.Application
Set Excel97=new Excel.Application
变量名不一致

[apu510064]

变量名

[打死不掉牙]

直接dim Excel2003 As New Excel.Application就行啊

[fvflove]

Dim Excel as Excel.Application
Set Excel97=new Excel.Application
....


因为你开始是在 Excel97中调用的.

所以默认情况下.
Excel.Application
为97下的 Excel.Application 类.

而你现在是在 Excel2003下用,
所有的类库不同


引用中也将Microsoft Excel11 object Lib 这一项钩上

虽然你勾上了,不表示用的时候,就用上了.

建议.

1.取消 97 的引用.

2.将
Dim Excel as Excel.Application
Set Excel97=new Excel.Application

这二句删除,重写一次.

[sword281]

Dim Excel as Excel.Application 为笔误，应为
Dim Excel97 as Excel.Application

[lcsfxs]

引用ADO了吗?

[sword281]

重写了一次也不行
Dim ExcelFile as Excel.Application
Set ExcelFile= new Excel.Application
还是报对象变量或WITH变量未设置。

[yinweihong]

Dim ExcelFile as Object
Set ExcelFile= CreateObject("Excel.Application")

[yinweihong]

office的版本不同，要用late binding~