如何关闭关闭所有打开的EXCEL文件

differ1 2003-03-12 11:14:51
我在VB里调用API用:
hwnd1 = FindWindow("XLMAIN", "Microsoft Excel - rp")
If hwnd1 <> 0 Then
SendMessage hwnd1, WM_CLOSE, 0, 0 '如果存在,CLOSE IT
Exit Sub
End If
但这样只能关闭已知文件名的文件我想关闭所有打开的EXCEL文件怎么做?
连EXCEL本身也关掉.
...全文
54 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
differ1 2003-03-12
  • 打赏
  • 举报
回复
EnumWindows不怎么好用啊 ?
AskORQuestion 2003-03-12
  • 打赏
  • 举报
回复
先用findwindow找到或者用EnumWindows找到excel窗口,
然后用
TerminateProcess结束它的生命,
大概思路是这样的
gwlonghair 2003-03-12
  • 打赏
  • 举报
回复
用VB提供的EXCEL对象做
申请excel.application

最后用\
excel.quit //退出
set 对象=nothing

1,486

社区成员

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

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