在VB中把数据转换成Excel文件时有时出错,为什么?

hbdzgl 2002-07-28 06:09:21
'下面的代码在有的微机中能顺利执行,没有错误
'但在有的微机中就出错,不知什么原因,请高手指教
Dim WSheet As Worksheet
Dim WBook As Workbook
Dim AppExcel As Object

On Error GoTo CW

Set AppExcel = CreateObject("excel.application")
Set WBook = AppExcel.Workbooks.Add '运行到此句就出错,
'显示“自动化错误”
Set WSheet = AppExcel.Sheets(1)
...全文
31 2 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
chenyu5188 2002-07-28
不懂~!!!

UP先
  • 打赏
  • 举报
回复
forever_chang 2002-07-28
低版本的OFFICE可能不支持这些VBA
编程时最好用低版本office所支持的VBA代码
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类

7617

社区成员

VB 基础类
社区管理员
  • VB基础类社区
加入社区
帖子事件
创建了帖子
2002-07-28 06:09
社区公告
暂无公告