Win7中VB打开excel对象，但是报错“429”ActiveX部件不能创建对象，XP就没有这个问题

Question

dim objexcelfile as objectset objexcelfile = createobject("excel.application")set objexcelfile = nothingset objexcelfile = createobject("excel.application")这句话运行就报错“429”ActiveX部件不能创建对象了

Answer 1

参考在VB中CreateObject("Excel.Application")时提示自动化错误的解决方法***********************************************************************
最近编程序时，想把Excel表里的数据导入到VB的MSHFlexgrid插件中，但不管怎么弄都提示CreateObject("Excel.Application")时提示自动化错误，在网上也查了很多资料，也没有有用的。因为我的系统是Win7+Office 2007，我感觉可能是Office 2007不支持，但用CreateObject("Word.Application")和CreateObject("Access.Application")都正常，看网上说可能是Excel安装的问题，我重新安装了一遍还有老样子，但多了一个错误提示，是来自Excel的说是ExcelMenu.dll错误。这个文件是Excel2007的Office2003工具栏插件，我把这个插件禁用后，程序就正常了！大家如果也有类似的问题，可以在Excel里的插件找找问题！

Answer 2

我在Win7+Office2007下的Word的宏里运行：
set obj=CreateObject("Application.Word")
Msgbox obj.version
这句话运行就报错“429”ActiveX部件不能创建对象了但是上面的语句在别的环境下是可以运行的

Answer 3

是的，我在这里写错了，程序上是Word.Application，没问题的