アクティブセルの変更と同時に、表示されるシートの位置を変更する方法です
Scroll:=True にするとアクティブセルは常に左上となりますが、Scroll:=False にするとアクティブセルのみ変更となります
ただし、アクティブセルがシートの表示範囲外になる場合には、アクティブセルが表示されるような最小限のスクロールが発生します

表示されるシートの位置のみ変更する場合には Window オブジェクトのプロパティを設定する方法で行います

Application.Goto Reference:=Worksheets(1).Cells(1, 1), Scroll:=True