关于excel进程的问题

touch_hand 2012-03-15 11:00:21
在通用声明里:
Dim objExcel As Excel.Application

在过程里:
Set objExcel = New Excel.Application

建立一个按钮用于关闭是:
Set objExcel = Nothing

请问这样还是关闭不了excel进程是为什么?
...全文
74 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
东方之珠 2012-03-15
  • 打赏
  • 举报
回复
没有定义就不要了。但这个xlExcel.Quit不能少。
touch_hand 2012-03-15
  • 打赏
  • 举报
回复
假如我没有定义Excel.Worksheet
所以不关闭Excel.Worksheet

有问题吗?
东方之珠 2012-03-15
  • 打赏
  • 举报
回复
东方之珠 2012-03-15
  • 打赏
  • 举报
回复
注意下面顺序:
Dim xlExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
................................
xlBook.Save
xlBook.Close
xlExcel.Quit
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlExcel = Nothing
sonicuu 2012-03-15
  • 打赏
  • 举报
回复
先要关闭里面的Workbook,Sheet
东方之珠 2012-03-15
  • 打赏
  • 举报
回复
没有关系。对象objRange 释放了吗?
还有对象要实例化,全部用New来定义:
Dim xlExcel As New Excel.Application
Dim xlBook As New Excel.Workbook
Dim xlSheet As New Excel.Worksheet
Dim objRange As New Excel.Range
touch_hand 2012-03-15
  • 打赏
  • 举报
回复
按照楼上的方法进行测试

通用-声明里定义:
Dim xlExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim objRange As Excel.Range

按钮事件里关闭:
xlBook.Close
xlExcel.Quit
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlExcel = Nothing

执行到xlBook.Close和xlExcel.Quit这里,显示“对象变量或ith 块变量未定义”

请问,我在中间的一个事件里定义了一个:
ActiveSheet.Pictures.Insert("D:\签名.jpg").Select '插入图片

有关系吗?

7,763

社区成员

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

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