判断EXCEL的版本,可以用以下代码
Set a = CreateObject("Excel.Application")
MsgBox a.Version
返回10.0是XP,9.0是2000, 8.0是97。只要你Set a=nothing,EXCEL就被关闭了吧?应该没有问题,我试过多次了。如果不用END,也可以通过遍历FORMS集合,然后UNLOAD所有窗体来退出程序。
Set a = CreateObject("Excel.Application")
MsgBox a.Version
返回10.0是XP,9.0是2000, 8.0是97。只要你Set a=nothing,EXCEL就被关闭了吧?应该没有问题,我试过多次了。如果不用END,也可以通过遍历FORMS集合,然后UNLOAD所有窗体来退出程序。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货