EXCEL - Hiding the ribbon programmatically

Public Sub hideRibbon()

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

End Sub

Public Sub showRibbon()

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

End Sub