| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1339 人关注过本帖
标题:不能完全清除内存,导致下次再进行同样操作时出错!
只看楼主 加入收藏
huangyz_xy
Rank: 2
等 级:论坛游民
帖 子:101
专家分:30
注 册:2016-10-2
结帖率:77.78%
收藏
 问题点数:0 回复次数:1 
不能完全清除内存,导致下次再进行同样操作时出错!
这是一个将access table导出到EXCEL的模块代码,调用这个模块后不能完全清除内存(能监视到),导致接着再次调用这个模块的时候前3段语句不能执行“对象变量或with块变量未设置”出错,如果退出程序再执行就没有问题,请问有什么办法在执行完成后就完全清除内存呢?   
1 .   ActiveSheet.name = Table
2 .  Worksheets("sheet2").Delete
3 .   Worksheets("sheet3").Delete
    xlBook.SaveAs PathVal
    MsgBox "已经输出" & PathVal & "表,请查看!", vbInformation, "Yams"
    xlBook.Close
    Set xlApp = Nothing '"交还控制给Excel
    Set xlBook = Nothing
    Set xlSheet = Nothing
    Conn.Close
    Set Conn = Nothing
搜索更多相关主题的帖子: 清除 出错 Set Nothing 内存 
2019-10-11 20:02
huangyz_xy
Rank: 2
等 级:论坛游民
帖 子:101
专家分:30
注 册:2016-10-2
收藏
得分:0 
已经搞定了
2019-10-12 00:18
快速回复:不能完全清除内存,导致下次再进行同样操作时出错!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.041846 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved