Foxtable(狐表)用户栏目专家坐堂 → excel 进程无法退出


  共有626人关注过本帖平板打印复制链接

主题:excel 进程无法退出

帅哥哟,离线,有人找我吗?
puma
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:343 积分:2886 威望:0 精华:0 注册:2023/6/7 16:07:00
excel 进程无法退出  发帖心情 Post By:2024/2/26 8:35:00 [只看该作者]

问题:excel 进程无法自动退出,每次需要手动关闭进程?
还有其他关闭的命令吗?

一个 app 进程只能打开一个excel文件?

代码
Dim App As New MSExcel.Application
App.Visible = True
app.EnableEvents =False
app.DisplayAlerts = False '关闭excel 警告
app.AskToUpdateLinks = False '关闭excel 数据更新提示
Dim sWb As MSExcel.Workbook '原始文件
Dim dwb As MSExcel.Workbook '目标文件
swb = app.Workbooks.Open(FileName:=sFilePath , UpdateLinks:=0)
....代码

dwb.Close(SaveChanges:=True) '顺序不能更改
swb.Close(SaveChanges:=False) '顺序不能更改
App.quit

图片点击可在新窗口打开查看此主题相关图片如下:下载.png
图片点击可在新窗口打开查看


 回到顶部