Full Screen Macro

[steve case]

An old set of macros that worked on Excel 97-2003 were used to completely clear the
screen of everything except the cells. I now have Excel 2013 and have transferred the
old file, and the macros do work except as shown below:

Here's my code:

Sub FullScreen()
'
' FullScreen Macro
' Macro recorded 2018-02-19 by Steve Case
'
' Keyboard Shortcut: Ctrl+f
'
    Application.DisplayFullScreen = True
    Application.CommandBars("Worksheet Menu Bar").Enabled = False
    Application.DisplayFormulaBar = False
    Application.CommandBars("Forms").Visible = False
    Application.CommandBars("Standard").Visible = False
    Application.CommandBars("Formatting").Visible = False
With ActiveWindow
        .DisplayHeadings = False
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
        .DisplayWorkbookTabs = False
    End With
    ActiveSheet.DisplayPageBreaks = False
End Sub

And to restore tool bars here's that code:

Sub RestoreToolBars()
'
' RestoreToolBars Macro
' Macro recorded 2018-02-19 by Steve Case
'
' Keyboard Shortcut: Ctrl+u
'
   Application.DisplayFullScreen = False
    Application.CommandBars("Worksheet Menu Bar").Enabled = True
    Application.DisplayFormulaBar = True
    Application.CommandBars("Standard").Visible = True
    Application.CommandBars("Formatting").Visible = True


With ActiveWindow
        .DisplayHeadings = True
        .DisplayHorizontalScrollBar = True
        .DisplayVerticalScrollBar = True
        .DisplayWorkbookTabs = True
    End With
    ActiveSheet.DisplayPageBreaks = True
End Sub

Is there a line of code that I can add to make the unwanted

"(Excel Icon) MyFile[Compatability Mode] - Excel (View & Exit)"​

disappear and reappear?

Background:

My hard drive crashed and Windows 2010 was reinstalled on a new hard drive with
my old office 2003 but the Excel 97-2003 that had been running now doesn't and I
have Excel 2013 now.* I am very unhappy about this as Excel 2013 does things I
don't need or want, and those things that used to take two clicks now take 3 or 4
and are renamed, relocated and in some cases aren't there, I.e., the "Forms" toolbar
with all the buttons which you see in the "My File" image above.

Oh! I use this feature with [Alt-Tab] "Print Screen" to paste into a 640x480 pixel blank
in a graphics program so that it always is located in the upper left corner. That unwanted
top bar ruins the the technique.

*I'm not exactly sure what I had before - my old files on a thumb drive say Excel 1997-2003

 

[steve case]

If you remove that it wont work at all. His code was complete, as is...it doesn't go between Sub/End Sub. Paste it into a blank module and try running the macro "hide_menu".

Thanks - I figured out what to do shortly after my 10:11 post

 

[jproffer]

Good deal . I figured you would, but wanted to point it out just in case. Glad you got it working.