アクティブセルの変更と同時に 表示されるシートの位置を変更する方法です
Scroll:=False にするとアクティブセルのみ変更となりますが アクティブセルがシートの表示範囲外になる場合には
アクティブセルが表示されるような最小限のスクロールが発生します
表示されるシートの位置のみ変更する場合には Window オブジェクトのプロパティを設定する方法 もあります
Application.Goto Reference:=Worksheets(1).Cells(1, 1), Scroll:=True