|
全画面表示にする際、ツールバーや、タイトルバーを消そうと下記のVBAを組みました。excel2003では、ツールバーも、タイトルバーも隠すことができたのですが、excel2007ですと、タイトルバーが残ってしまいます。。。
どうしたら、タイトルバーを消せるかどなたか教えていただけるとうれしいです。
Sub FullScreenAndHideMenu()
Application.DisplayFullScreen = True
CommandBars("Worksheet Menu Bar").Enabled = False
With ActiveWindow
.DisplayHorizontalScrollBar = False '水平スクロールバーを消す
.DisplayVerticalScrollBar = False '垂直スクロールバーを消す
.DisplayWorkbookTabs = False 'シート見出しを消す
.DisplayGridlines = False '枠線を消す
.DisplayHeadings = False '行列番号を消す
End With
End Sub
|
|