VB 中使用CreatObject("Excel.Application")的问题

来源:百度知道 编辑:UC知道 时间:2024/06/03 05:24:35
一抬机器上安装了EXCEL,但是在VB中用CreatObject("Excel.Application")是报错:ActiveX不能创建控件,而且在注册表中找不到Excel.Application键值,请问有什么解决方法和替代方法?
请解释详细一点好吗?我的是这么写的
dm exApplication as new Excel.Application
for nx=1 to 4
Set exApplication = CreatObject("Excel.Application")
...
next
怎么改?
二楼:我按你那么做了啊,还是不行

dm exApplication as new Excel.Application

Set exApplication = CreatObject("Excel.Application")

for nx=1 to 4

...
next

需要在VB工程里先引用EXCEL的库文件.
具体方法:点击VB程序里的工程--引用--然后在里面选择:microsoft excel 11.0 object library(一般安装的是office2003的话就叫这个名字),然后点击OK.就行了.
还有你写的语句,你声明的时候已经用了new了,所以,后面那个set....=new ---那句可以不用了.

dm exApplication as new Excel.Application
for nx=1 to 4
Set exApplication = CreatObject("Excel.Application")
...
next

首先,你的关键字写错了:是Dim而不是dm.
其次,如果你要在后面为你的exApplication重新分配内存,那么在声明的时候不要用new关键字.
看了你的语句,好像你每一个循环都要重新生成一个电子表格对像.
这个样子处理不好很容易产生错误,有可能是你的循环体内的代码出错.