| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1144 人关注过本帖
标题:求VB与Excel进程问题
只看楼主 加入收藏
crzzx
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2008-7-8
收藏
 问题点数:0 回复次数:3 
求VB与Excel进程问题
我想把VB中的数据保存在Excel中,我用的一个开始和结束按钮,但是当我按下结束按钮时,Excel并没有在进程中消失
,除非我把整个程序给结束了才可以终止Excel这个进程,可我又不能终止整个程序的运行,问下高手有什么方法可以在不用
终止程序的情况下就可以结束Excel进程。下面是我的程序代码:
Dim exApp  As Excel.Application
Private Sub start_Command_Click()
  Set exApp = New Excel.Application
   CommonDialog1.Filter = "Excel 表|*.xls"
     CommonDialog1.ShowOpen
      If Len(CommonDialog1.FileName) >= 1 Then
    exApp.Workbooks.Open CommonDialog1.FileName
    Range(Cells(1, 1), Cells(1, 1)) = "采集的温度"
   Range(Cells(1, 2), Cells(1, 2)) = "P(比例系数)"
   Range(Cells(1, 3), Cells(1, 3)) = "I(积分系数)"
   Range(Cells(1, 4), Cells(1, 4)) = "D(微分系数)"
   exApp.ActiveWorkbook.Save
    exApp.ActiveWorkbook.Close
      End If
End Sub
Private Sub stop_Command_Click()
   exApp.Quit
   Set exApp = Nothing
End Sub
望大家给点意见!
搜索更多相关主题的帖子: Excel进程 Cells exApp Range 
2008-07-14 09:06
随风逐流
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:passerby
等 级:版主
威 望:8
帖 子:4054
专家分:271
注 册:2007-6-13
收藏
得分:0 
正常情況是可以關的

[url=http://www./html/6/6694/]极道金丹[/url][url=http://www./html/2/2849/]九阴九阳[/url][url=http://www./html/2/2596/]凡人修仙传[/url]
2008-07-14 11:27
crzzx
Rank: 1
等 级:新手上路
帖 子:5
专家分:0
注 册:2008-7-8
收藏
得分:0 
回复 2# 随风逐流 的帖子
我发现好多人都遇到类似这样的问题,可我严格按照这样操作就不能结束Excel进程.
2008-07-14 14:33
随风逐流
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:passerby
等 级:版主
威 望:8
帖 子:4054
专家分:271
注 册:2007-6-13
收藏
得分:0 
對的
在一般情況是可以關掉的
不一般的情況是:在VB裡面還沒結束EXCEL進程,你在外面打開EXCEL或操作EXCEL就會導致VB裡面無法結束進程
關於這個問題,你只能優化你的代碼,儘量程序操作完EXCEL就結束進程,下次要用再打開

[url=http://www./html/6/6694/]极道金丹[/url][url=http://www./html/2/2849/]九阴九阳[/url][url=http://www./html/2/2596/]凡人修仙传[/url]
2008-07-14 14:37
快速回复:求VB与Excel进程问题
数据加载中...
 
   



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

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