操作excel,错误 80040154

来自于dg97112c的求助帖,我正好遇到同样问题,看到这个贴字解决了.

帖子地址:http://topic.csdn.net/u/20110428/09/aa420af6-670b-4d5e-9e3c-02a45df488dd.html

问题:

VS2010+office2003

添加了引用的
输出时直接就提示:
检索 COM 类工厂中 CLSID 为 {00020819-0000-0000-C000-000000000046} 的组件失败,原因是出现以下 
错误: 80040154 没有注册类别 (异常来自 HRESULT:0x80040154 (REGDB_E_CLASSNOTREG))。

网上找了很多方法对DCOM配置进行了设置,问题还是一样。OFFICE也重装了,换成OFFICE XP 和OFFICE2000也是同样的问题

 

解决:

原代码:
Dim xlApp As New Excel.Application
Dim xlBook As New Excel.Workbook
Dim xlSheet As New Excel.Worksheet

我找到问题了,xlBook和xlSheet定义的时候使用了NEW.汗看别人程序时太粗心了,以为都有NEW呢。
正确的写法是:
Dim xlApp As New Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
xlBook = xlApp.Workbooks.Open("c:\1.xls")
xlSheet = xlBook.Worksheets(1)
网上看到很多也遇到这样的错误,不知道是不是都是我这样的错误哈。希望对你有帮组

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

老侯

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值