G Gord Dibben May 4, 2010 #2 Sub qwert() ActiveWindow.ScrollRow = 100 End Sub Gord Dibben MS Excel MVP