建议加入错误处理代码:
on err goto err_holder
...
...
err_holder:
    debug.print err.description
end function
加入错误处理用单步追踪xl在quit之前是否有错误发生.xl肯能需要save,因为xl不可见,提示你保存的窗口也不可见,最好把这个改动存盘的提示unenable.
注意:
    由于在xl中使用了外部资源图形,肯能对xl的quit有影响(只是猜测),可以通过
  打开xl然后简单做一下操作,再试试能否正常退出.
good lucky!