VBAでExcelの表示倍率を変更

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

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

Option Explicit
Sub changeZoom()

  ActiveWindow.Zoom = 50
  ActiveWindow.Zoom = 200

End Sub

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

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

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