【EXCEL VBA】画面サイズを色々変更したい

今回は画面サイズを色々と変更する方法を紹介します。色々とは、全画面、最大化、最小化、標準サイズ、フルスクリーン、指定サイズなどになります。ユーザに色々触ってほしくない、視認性が最優先など要件に合わせて利用してください。

全画面表示にすると、以下のようにメニューやリボンも非表示になります。

サンプルプログラム

Option Explicit

Sub sample()
    
    MsgBox ("全画面表示にします")
    Application.DisplayFullScreen = True
    
    MsgBox ("全画面表示を解除します")
    Application.DisplayFullScreen = False

    MsgBox ("最大化します")
    Application.WindowState = xlMaximized

    MsgBox ("最小化します")
    Application.WindowState = xlMinimized
    
    MsgBox ("標準サイズにします")
    Application.WindowState = xlNormal
    
    MsgBox ("320x160のサイズにします")
    Application.WindowState = xlNormal
    Application.Width = 320
    Application.Height = 160

End Sub
タイトルとURLをコピーしました