This will scroll down five rows on the active sheet.

Sub fj()
ActiveWindow.SmallScroll Down:=5
End Sub

You should be able to manually scroll. However, if you need to use code the
above scrolls by line. Use the same syntax with LargeScroll to scroll by
page. Direction options are Up:=, Down:=, Right:= and Left:=

"fred" wrote:

Hello,
I am using Excel automation and vbasic 5 programming to add data to the
opened sheet, however after reaching the sheet's window full of data the
next rows of data are below the screen.
How to display the current row and preferrably a few empty rows after that
in real time?
Please advise,
Fred