本示例保存所有打开的工作簿,然后退出 ET。
For Each w In Application.Workbooks
w.Save
Next w
Application.Quit