Hi Robin

You could do it using the code below.

Option Explicit
'you could also put the button event in the beforeclose event of the
workbook module to save you having to remember to do it.

Private Sub CommandButton1_Click()
Application.DisplayFullScreen = False
Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub

Private Sub Workbook_Open()
Application.DisplayFullScreen = True
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub


hope it helps

S