シートのズーム : Excel(エクセル)

(Excel2007でソフト作成)

Excel Tipsメニューに戻る

スポンサーリンク






Excel VBAでシートの表示倍率を変更するには、Zoomプロパティを使います。
値は10〜400%の範囲で設定します。
Trueに設定すると、現在選択している範囲に適しているウィンドウサイズに設定します。

Excelシート画面

■実行Excelシート
ズームイン実行画面
拡大表示画面

ズームアウト実行画面
縮小シート画面

スポンサーリンク


Excel VBA実行コード

Option Explicit

Private lz As Long

'ZOOM IN
Sub ボタン1_Click()
    If lz = 0 Then
        lz = 100
    End If
    
    lz = lz + 20
    ActiveWindow.Zoom = lz
End Sub

'ZOOM OUT
Sub ボタン2_Click()
    If lz = 0 Then
        lz = 100
    End If
    
    lz = lz - 20
    If lz < 20 Then
        Beep
        lz = 20
    End If
    ActiveWindow.Zoom = lz
End Sub

Excel Tipsメニューに戻る

スポンサーリンク






■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved