Hide Ribbon

[Brutium]

Hello All,

I am trying to hide most of my ribbon. with the following VBA code

Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

I am able to hide the Excel Ribbon in my workbook, but I want to accomplish is make sure that the File tab is always visible. How can I accomplish this?
Any Help would be GREATLY appreciated.

Brutium

 

[DannyBOHLEN]

Try this:

Private Sub WorkBook_Open()
      Application.ScreenUpdating = False
      Application.CommandBars("Worksheet menu bar").Enabled = False
      Application.DisplayFullScreen = True
      Application.CommandBars("Full Screen").Visible = True
      Application.DisplayFormulaBar = False
      Application.ScreenUpdating = True
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.CommandBars("Worksheet menu bar").Enabled = True
    Application.DisplayFullScreen = False
    Application.CommandBars("Full Screen").Visible = False
    Application.DisplayFormulaBar = True
End Sub

 

[Brutium]

Thank you Danny
The first set of code will hide everything, even the menu bar. The second I am bnot sure what it does since nothing seems to happen.

What I need to do is have the ribbon disappear, but leave the FILE tab active so that the user of my workbook will be able to conduct some of the functions found under FILE, such as "Open", "Save", Save As", "Print". These are the only ones I really need.

Thank you for your help...

Much appreciated!

Brutium

 

[Brutium]

Hello DannyBohlen or anyone else who might have an answer...

I can modify the code you provided me yesterday, but I was wondering, is there a way that I can activate only the "FILE" tab of the Ribbon?