VBA code to hide ribbon / menu bar ?

[Aflatoon]

To hide:
[vba]Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"[/vba]

to show, simply change False to True.