VBA～左上端に表示されるセルを指定しよう～Excel

VBAで左上端に表示されるセルを指定したい場合はWindow.ScrollRowプロパティで指定のセルの行番号を設定し、Window.ScrollColumnプロパティで指定のセルの列番号を設定します。

下のコードを実行するとアクティブウィンドウのセルG5が左上端に表示されます。

Sub test1()

ActiveWindow.ScrollRow = Range("G5").Row
ActiveWindow.ScrollColumn = Range("G5").Column

End Sub

指定したシートの左上端に表示するセルの指定

指定したシートで左上端に表示するセルを指定したい場合はまず、シートをアクティブにします。

下のコードを実行するとSheet2のセルG5が左上端に表示されます。

Sub test2()

Worksheets("Sheet2").Activate
ActiveWindow.ScrollRow = Range("G5").Row
ActiveWindow.ScrollColumn = Range("G5").Column

End Sub

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

指定したブックで左上端に表示するセルを指定したい場合はまず、ブックをアクティブにします。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1のセルG5が左上端に表示されます。

Sub test3()

Workbooks("Book1.xlsx").Activate
ActiveWindow.ScrollRow = Range("G5").Row
ActiveWindow.ScrollColumn = Range("G5").Column

End Sub