Place this events in the Thisworkbook mudule

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
End Sub


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"emu_tails" wrote in message ...
I'm trying to write two seperate macros to make changes to a workbook
when I open it and close it.

When I open the workbook I want to go to fullscreen - which I've
managed to do. However!

When I close the workbook I want to cancel the fullscreen option.

I've tried several things including the WorkBookBeforeClose sub. I can
get Excel to make the changes when I write and run a macro to close the
workbook. But when I use the Close function in the File menu, Excel
stays in fullscreen mode!! Quite frustrating!

Can anyone help??

Many thanks.

Andrew.



------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/