VBA～シートをスクロールしよう～Excel

VBAでシートをスクロールしたい場合はWindow.LargeScrollメソッドまたはWindow.SmallScrollメソッドで設定できます。パラメーターDown,Up,ToRight,ToLeftがそれぞれ下、上、右、左スクロールに対応しています。

Window.LargeScrollメソッド

Window.LargeScrollメソッドは指定されたページ数分だけスクロールします。

下のコードを実行すると下に1ページ、右に1ページ、スクロールします。

Sub test1()

ActiveWindow.LargeScroll Down:=1
ActiveWindow.LargeScroll ToRight:=1

End Sub

Window.SmallScrollメソッド

Window.SmallScrollメソッドは指定された行数、列数だけスクロールします。

下のコードを実行すると下に1行、右に1列、スクロールします。

Sub test2()

ActiveWindow.SmallScroll Down:=1
ActiveWindow.SmallScroll ToRight:=1

End Sub

指定したシートでスクロールする

指定したシートでスクロールしたい場合はまず、シートをアクティブにします。

下のコードを実行するとSheet2を下に1ページ、右に1ページ、スクロールします。

Sub test3()

Worksheets("Sheet2").Activate
ActiveWindow.LargeScroll Down:=1
ActiveWindow.LargeScroll ToRight:=1

End Sub

指定したブックでスクロールする

指定したブックでスクロールしたい場合はまず、ブックをアクティブにします。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1を下に1ページ、右に1ページ、スクロールします。

Sub test4()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Activate
ActiveWindow.LargeScroll Down:=1
ActiveWindow.LargeScroll ToRight:=1

End Sub