Thanks Die, it works!
The "ActiveWindow.SmallScroll Up:=40 'Change 40 as needed" feature is a
nice touch too.
Amy

"Die_Another_Day" wrote:

I use this to goto the last row then scroll up so the last row is near
the bottom.
Application.Goto reference:=Cells _
(ActiveCell.SpecialCells(xlCellTypeLastCell).Row, 1), _
Scroll:=True
ActiveWindow.SmallScroll Up:=40 'Change 40 as needed

Charles

AMY Z. wrote:
Hi,
Is there a way to scroll down to the last row that contains data? I'm using
the "LASTINCOLUMN" Function right now to get a value, but would also at times
like to go physically to the last row too.

I would run this procedure by pushing a command button.

I understand how to connect the button to the procedure.

I tried the archives but maybe didn't word it right.

Thank you for your time,
Amy