Office中国论坛/Access中国论坛

标题: 向所有的高手求救,解决EXCEL不能完全退出的问题 [打印本页]

作者: rogertian 时间: 2004-1-6 19:08
标题: 向所有的高手求救,解决EXCEL不能完全退出的问题
在ACCESS调用EXCEL生成文件后,EXCEL并不能完全退出.找了很多这方面的资料,按着去做,但并不可以.有谁有好的方面直接杀掉驻留在内存里面的EXCEL?

注意:我己经在程序最后加上了XLAPP.QUIT[attach]3022[/attach]

作者: zhuyiwen 时间: 2004-1-6 20:18

Dim xlApp As Excel.Application
Dim xlBook As Workbook, xlSheet As Worksheet
Set xlApp = CreateObject("Excel.Application")
Set xlApp = New Excel.Application
xlApp.Visible = True

下面两句是一样的:
Set xlApp = CreateObject("Excel.Application")
Set xlApp = New Excel.Application

这里打开了两个EXCEL应用,只要其中的一句,即可
注:第一句为后期绑定,第二句为前期绑定, 两句实现同一个目的, 后者较快.

建议抄别人的代码的时候,一定要理解,否则漏洞百出!

[此贴子已经被作者于2004-1-6 12:43:47编辑过]

作者: rogertian 时间: 2004-1-6 22:35
我无论注释掉哪一句话,都可以看到有一个EXCEL的程序驻留在内存里面.还是不行.

作者: 我要飞 时间: 2004-1-6 23:02
在QUIT之前加一句：xlApp = Nothing

作者: anthony 时间: 2004-1-7 01:04
不行,我写过set xlApp = Nothing ,如果放在XLAPP.QUIT之前,XLAPP.QUIT这句就会出错的.

作者: anthony 时间: 2004-1-7 01:07
??

[此贴子已经被作者于2004-1-6 17:12:51编辑过]

作者: rogertian 时间: 2004-1-7 01:16
有谁愿意帮我看一看,我把源程序发给他.现在这个程序太大了.压缩后都有快3M了,不能上传.

作者: zhuyiwen 时间: 2004-1-7 01:30
运行了你贴的程序,没有你所说的情况

作者: rogertian 时间: 2004-1-7 19:27

以下是引用zhuyiwen在2004-1-6 17:30:01的发言：
运行了你贴的程序,没有你所说的情况

如果程序中只写入数据,是没有问题的,但如果把EXCEL定义的宏生成的VBA写进来,定义单元格格式时就会出错了.因为数据大多了,我就拆出来这个有问题的地方,上传请大家再看一看.连续生成两次EXCEL就会出错.

应该是EXCEL生成的VBA的问题.[attach]3043[/attach]

作者: anthony 时间: 2004-1-7 20:10
试试.
Public xlsApp As New excel.Application
Public xlsBook As New excel.Workbook
Public xlsSheet As New excel.Worksheet

Private Sub ExportExcel()

      Set xlsApp = New excel.Application
      Set xlsBook = xlsApp.Workbooks.Add
      Set xlsSheet = xlsBook.Worksheets.Add

      xlsSheet.Application.Visible = True

      ' 页眉页脚
      ExportPageHeaderFooter xlsSheet

      ' 栏格式
      SheetColumnsFormat xlsSheet

      ' 主表体
      ExportMainBody xlsSheet, 1, True

      ' 设定页面
      SetPrintPage xlsSheet
      xlsSheet.PageSetup.Orientation = xlLandscape

      Set xlsApp = Nothing
      Set xlsBook = Nothing
      Set xlsSheet = Nothing

End Sub

作者: huanghai 时间: 2004-1-7 21:13
你注意操作系统有没有问题，换台电脑试试

作者: rogertian 时间: 2004-1-7 21:19
不是会操作系统的问题吧!我家里用的是WINDOWSXP+OFFICE XP,公司用的是WINDOWS2000+OFFICE 2000 ,都不行的.

[此贴子已经被作者于2004-1-7 13:19:34编辑过]

作者: anthony 时间: 2004-1-7 21:22
这个是不是BUG?我看到好多人讨论过调用EXCEL不能完全退出的问题,VB中也有过这种情况.

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)