VBAでExcelの表示倍率を変更

VBAでExcel画面の表示倍率を変更するにはActiveWindow.Zoomを使用します。

ActiveWindow.Zoomを使用して表示倍率を変更するコードは以下になります。

1Option Explicit
2Sub changeZoom()
3
4  ActiveWindow.Zoom = 50
5  ActiveWindow.Zoom = 200
6
7End Sub

パーセント単位で大きさを指定します。100が通常の大きさになります。

ActiveWindow.Zoom = 50で50%の表示倍率になります。

ActiveWindow.Zoom = 200で200%の表示倍率になります。