以前、「ツールバーをすべて消す」などの記事を書いたが、それをもうちょっと進めてみた･･･ま、ちょっとしたお遊び(^^)

Sub ShowFullScreen(ByVal b As Boolean)
Dim cb As CommandBar
Dim wb As Workbook
Dim ws As Worksheet
Dim w As Window

Application.DisplayFullScreen = b
Application.DisplayFormulaBar = Not b
Application.DisplayStatusBar = Not b

For Each cb In Application.CommandBars
cb.Enabled = Not b
Next

For Each wb In Application.Workbooks
For Each w In wb.Windows
w.DisplayHeadings = Not b
w.DisplayGridlines = Not b
w.DisplayHorizontalScrollBar = Not b
w.DisplayVerticalScrollBar = Not b
w.DisplayWorkbookTabs = Not b
Next
Next
End Sub

Trueにしてコールするとタイトルバーもメニューも何もかも消えてしまうので注意。消えちゃったときは、慌てずAlt-F11でVisual Basic Editorを表示して、Falseを指定してコールしなおしましょう。

でも、EXCELでEXCELっぽくないアプリを作りたいときは良いかも(^^)