请问，如果系统中打开了多个 Excel 的 Application，如何用代码关闭不需要的，只保...

mansohu · 发表于 2016-1-21 11:58

请问，如果系统中打开了多个 Excel 的 Application，如何用代码关闭不需要的，只保留需要的一个呢？谢谢！

mansohu · 发表于 2016-3-6 12:18

还请帮忙，谢谢啦！

huang1314wei · 发表于 2016-3-6 13:23

不需要的具体是什么

phsu · 发表于 2016-3-6 13:58

當開啟了很多Excel進程，可透過Windows Management Instrumentation (WMI)擷取進程名稱，不過應該無從判斷哪個Excel進程是你要的。另一個想法，可用API的FindWindow函數，擷取不要的Excel窗體，再予以關閉。

mansohu · 发表于 2016-3-15 10:51

phsu 发表于 2016-3-6 13:58
當開啟了很多Excel進程，可透過Windows Management Instrumentation (WMI)擷取進程名稱，不過應該無從判斷 ...

你好，感谢回帖！
事情是这样的，我做了个COM加载项增加Excel的功能，代码中设了一个公共变量，用来代表 Application,当打开多个 Application 时，这个变量只能认其中一个，于是在其它的Application 中操作时，就出问题了，我的解决思路是，只允许打开一个 Application，但是我不知道如何控制？请问，有什么办法可以只允许打开一个Application 吗？谢谢了！

phsu · 发表于 2016-3-15 16:37

用GetObject來指定操作的進程即可。例如，你只想操作test.xls，則使用下列程式的xlApp，就只會操作這個檔案，不會受其他Excel檔案的影響。
Sub test()
Dim xlApp As Excel.Application
Set xlApp = GetObject("D:\VBA\test.xls").Application
xlApp.ActiveCell.Value = 100
End Sub

		自动登录	找回密码
密码			免费注册

[求助] 请问，如果系统中打开了多个 Excel 的 Application，如何用代码关闭不需要的，只保...

最新热点 /1