Saving all open workbooks

[Greg]

Hi all,

I am using a userform to look at different workbooks all at once. How do I
get excel to save all the workbooks at once then use the application.quit
option?

Thanks

Greg

[Ron de Bruin]

Try this Greg

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
wb.Save
Next wb
Application.Quit
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Greg" <laptopgb@ihug.com.au> wrote in message news:e0l33d$c7j$1@lust.ihug.co.nz...
> Hi all,
>
> I am using a userform to look at different workbooks all at once. How do I
> get excel to save all the workbooks at once then use the application.quit
> option?
>
> Thanks
>
> Greg
>
>

[Greg]

Thank you Ron works great

Greg
"Ron de Bruin" <rondebruin@kabelfoon.nl> wrote in message
news:uFnNRPWVGHA.4976@TK2MSFTNGP11.phx.gbl...
> Try this Greg
>
> Sub test()
> Dim wb As Workbook
> For Each wb In Workbooks
> wb.Save
> Next wb
> Application.Quit
> End Sub
>
>
> --
> Regards Ron de Bruin
> http://www.rondebruin.nl
>
>
> "Greg" <laptopgb@ihug.com.au> wrote in message
news:e0l33d$c7j$1@lust.ihug.co.nz...
> > Hi all,
> >
> > I am using a userform to look at different workbooks all at once. How
do I
> > get excel to save all the workbooks at once then use the
application.quit
> > option?
> >
> > Thanks
> >
> > Greg
> >
> >
>
>