vb6+win98中利用VB调用EXCEL的奇怪报错问题!

sonoman 2005-02-06 05:40:59
我在VB6中调用EXCEL应用程序,代码如下:
option explicit
dim xlsApp as excel.application
dim xlsWB as excel.workbook
dim xlsWS as excel.worksheet

command1_click()
set xlsApp=new excel.application《---我逐语句调试,执行完此句时不能得到EXCEL的实例,因为我 将 光标移到该行的xlsApp上时,报:该程序执行了非法操作,即将关闭
。如果仍有问题,请与程序供应 商联系。 我在另一台win98+vb6的机器上调试也如此,什么原因?请高手指点。我已经添加了excel lib的引用。
xlsApp.workbooks.add
set xlsWB=xlsapp.workbooks(1)
set xlsws=xlsWB.worksheets(1)
、、、、

end sub
...全文
113 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
sonoman 2005-02-07
  • 打赏
  • 举报
回复
我安装了OFFICE,并且EXCEL单独打开是没问题的,
改为Set xlsApp= CreateObject("excel.application")结果也一样,试着用
set xlsapp=getobject(,"excel.application")也一样。真不知道是什么原因,但在windows xp 系统下却可以,在另外一台WIN98系统下也不行。请高手们继续帮我解决。
注:报执行了非法操作后,看详细信息显示是rpcrt4.dll无效页之类的。
xiaohuasz 2005-02-06
  • 打赏
  • 举报
回复
试试用Set xlsApp= CreateObject("excel.application")
饮水需思源 2005-02-06
  • 打赏
  • 举报
回复
确认是否安装了office

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧