アクティブセルを変更せずに 表示されるシートの位置を変更する方法です 選択セルがシートの表示範囲外になる場合もあります 選択セルを同時に左上に変更する場合には Application.Goto メソッドを利用する方法 もあります
Windows(1).ScrollRow = 1 Windows(1).ScrollColumn = 1