Hide Ribbon and menu on startup

[NickDC1964]

I'm trying to write some code to cause the ribbon to disappear and also try to get the menu to disappear on startup. I can get 'CommandBars.ExecuteMso "MinimizeRibbon"' to work just fine anywhere EXCEPT the WorkBook Open event. Any ideas for this and to hide the Excel menu on startup?

 

[JonRowland]

Take a look at the sample files here. I believe you the example Dicator(1) is what you are after.

 

[Logit]

.
Paste in ThisWorkbook Module :

Private Sub Workbook_Open()
    Call hide_menu
End Sub

Paste in a Routine Module :

Option Explicit


Sub hide_menu()


With Worksheets("Sheet1")


    With ActiveWindow
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
    End With
    With Application
        .DisplayFullScreen = True
        .DisplayFormulaBar = False
        .DisplayStatusBar = False
    End With
    With Application
    
        .CommandBars("Full Screen").Visible = False
        .CommandBars("Worksheet Menu Bar").Enabled = False
        .CommandBars("Standard").Visible = False
        .CommandBars("Formatting").Visible = False
    End With
End With
End Sub

Don't forget to UNHIDE the menu when you close the workbook.