How do I make Excel stay in Full-screen ?

I have made my excel-document start up in full-screen-mode by using an auto open macro with the following code:

---

Please Login or Register  to view this content.

---

But here is the problem:
When I minimize Excel to the Taskbar and then maximize it again, it is no longer in full-screen-mode.

What can we do to remedy this?

Hey, you must put this into your standard module


Option Explicit


Sub HideAll()
With Application
.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
.DisplayFormulaBar = False
.DisplayStatusBar = Not Application.DisplayStatusBar
End With
ActiveWindow.DisplayWorkbookTabs = False


End Sub


Sub ShowAll()
With Application
.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
ActiveWindow.DisplayWorkbookTabs = True


End Sub





and put these code below on your ThisWorkbook Module

Option Explicit

application.screenupdating = true

Private Sub Workbook_Activate()
HideAll
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)
ShowAll
End Sub


Private Sub Workbook_Deactivate()
ShowAll
End Sub


Private Sub Workbook_Open()
HideAll
End Sub

This will enable your program be always run in full screen whenever you run the program