まさ工房

ExcelVBAとAcessDBを利用した業務支援ツールを作成する工房です

【Excelマクロ・VBA】Excelウィンドウを全画面表示(DisplayFullScreen)するにはどうすればいいの?教えて!

       f:id:m_kbou:20190624082059p:plain

Excelウィンドウを全画面表示する方法について説明します。Excelウィンドウの最大化とは若干結果が異なり、リボンメニューも非表示となります。結果、シート以外を非表示にしますので注意して下さい。

 

【目次】

 

構文

記述方法は、以下の通りとなります。

=======================================================================

Application.DisplayFullScreen = True

Application.DisplayFullScreen = False

=======================================================================

[説明]:

Application.DisplayFullScreenでは、Excelウィンドウを全画面表示にする指定ができますTrueを指定すると全画面表示する指定となり、内容を纏めると、「このブックのウィンドウサイズを全画面表示して下さい。」との意味になります。 また、Falseを指定すると全画面表示を元に戻す指定となり、内容を纏めると、「このブックのウィンドウサイズを元のサイズに戻して下さい。」との意味になります。

 

使い方

使い方について、具体的に説明していきます。

全画面表示

全画面表示する方法について説明します。

[記述例]:

※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。

-------------------------------------------------

Sub サンプル()
    Application.DisplayFullScreen = True
    MsgBox "全画面表示しました。"
End Sub

-------------------------------------------------

内容は、「このブックのウィンドウサイズを全画面表示にし、最後にMsgBoxで”全画面表示しました。”のメッセージを表示して下さい。」との意味になります。

[実行例]:

・初期表示

f:id:m_kbou:20190625092153p:plain

・全画面表示

※全画面表示にすると、リボンメニューが非表示になります。

f:id:m_kbou:20190625092207p:plain

ウィンドウを全画面表示する方法についての説明は以上です。

 

全画面表示を元に戻す

全画面表示を元に戻す方法について説明します。

[記述例]:

※以下の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。

-------------------------------------------------

Sub サンプル()
    Application.DisplayFullScreen = False
    MsgBox "全画面表示を戻しました。"
End Sub

-------------------------------------------------

内容は、「このブックのウィンドウサイズを全画面表示から元に戻し、最後にMsgBoxで”全画面表示を戻しました。”のメッセージを表示して下さい。」との意味になります。

[実行例]:

・全画面表示

f:id:m_kbou:20190625092220p:plain

・元に戻した表示

f:id:m_kbou:20190625092232p:plain

ウィンドウを全画面表示する方法についての説明は以上です。

 

おわりに

今回は、Excelウィンドウの全画面表示の方法について説明しました。類似の指定方法にExcelウィンドウサイズの設定Excelブックサイズの指定方法があります。こちらとの違いも理解してもらい、状況により有効に使い分けて下さい。