One I use to close all

Sub CLOSE_ALL()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each w In Workbooks
w.Save
Next w
Application.Quit
End Sub

--
Don Guillett
SalesAid Software

"Bry" wrote in message
...
Hi

i have a number of macro's that open and close different wokbooks to
analyse
data. at the moment they run fine but i have to manualy click 'no' on
saving
changes and to indicate that the large amount of information on the
clipboard
is no longer required. can someone please tell me the code to enter to do
this?

many thanks
Bry