Open workbook in full screen mode

Hi everyone,
I'll like a particular workbook to open in Full Screen Mode, and also to disable ESC from exiting full screen.
I'm using code below, but when I open other workbooks, they also open in Full Screen. I only would like a particular workbook to open in Full Screen, not all workbooks.
Also, when I minimize Excel and then go back to the workbook, it is not full screen anymore. I would like it to be on full screen even if I minimize Excel.

Thank you

Private Sub Workbook_Activate()
On Error Resume Next
    With Application
        .DisplayFullScreen = True
        .CommandBars("Worksheet Menu Bar").Enabled = False
    End With
Application.OnKey "{ESC}", ""
Application.EnableCancelKey = xlDisabled
End Sub

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)