スクロール編
一行分移動するには？
'一行スクロールする例です。
Sub 一行スクロール()
ActiveWindow.SmallScroll down:=1
End Sub
一ページ分移動するには？
'一画面分スクロールする例です。
'※ズーム倍率や環境によって移動する位置は変化します。
Sub 一ページスクロール()
ActiveWindow.LargeScroll down:=1
End Sub
行を指定して移動するには？
'行を指定して左隅に来るように移動
'100行目に移動する例です。
Sub 行を指定して移動()
ActiveWindow.ScrollRow = 100
End Sub
アクティブでないシートに移動するには？
'該当シートがアクティブでなくても行を指定して左隅に来るように移動
'2番目のシートの100行目に移動する例です。
Sub シートを超えて移動()
Application.Goto Reference:=Sheets(2).Range("A100"), Scroll:=True
End Sub