判断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所有窗体来退出程序。