アクティブセルまで画面をスクロールさせるには .Active

ExcelVBA 
アクティブセルを移動するのは、Range(アドレス).SelectとかRange(アドレス).Activateのように簡単ですね。
移動先のセルが現在のウィンドウ上に表示されていれば、ただアクティブセルが移動するだけですし、
移動先がウィンドウに表示されていない場合はワークシートが自動的にスクロールします。

ネタ元