Microsoft Excel VBA - Excelを全画面表示にする方法

◆概要

このページは、Excel VBAで Excelを全画面表示にする方法について記載しています。


Excelを全画面表示にするかどうかを設定するには、DisPlayFullScreenプロパティを使います。値は論理値で、"True"で全画面になります。


WindowStateプロパティに"xlMaximized"を設定すると、Excelは最大化画面になりますが、DisplayFullScreenプロパティを使用すると、アプリケーションのタイトルバーやツールバーが非表示になります。より広い画面をワークシートで使用できるようになります。

◆Sample code 

Sub ExcelFullScreen()
    Dim ret
    
    ret = MsgBox("エクセルを全画面で表示するようにしますか?", _
            vbYesNo + vbQuestion, "エクセルの全画面表示")
    If ret = vbYes Then
        'Excelを全画面表示にする
        Application.DisplayFullScreen = True
    Else
        Exit Sub
    End If
    
    ret = MsgBox("エクセルの全画面表示を閉じますか？", _
            vbYesNo + vbQuestion, "エクセルの全画面表示")
    If ret = vbYes Then
        'Excelを通常画面に戻す
        Application.DisplayFullScreen = False
    End If

End Sub



▼ページトップへ