Quit Method Example

This example saves all open workbooks and then quits Microsoft Excel.

For Each w In Application.Workbooks
    w.Save
Next w
Application.Quit