Scroll screen to the last blank rows

[gemini528]

I have a worksheet with more than 2000 rows and sometime itis time consuming to locate for the last blank row. What I need is your help tocreate a macro that when the sheet is activated, the screen will scroll down tothe last blank row and ready for data entry. Data Entry starts on column “C”.<o></o>
<o> </o>
Thank you in advance
Gemini528

 

[Fluff]

How about

Private Sub Worksheet_Activate()
Application.Goto Range("C" & Rows.Count).End(xlUp).Offset(1), True
End Sub