Code to go to last row (next blank row)

  • Thread starter Thread starter miker1999
  • Start date Start date
M

miker1999

Hi all,
I would like to create a command botton (macro) that would bring th
user to the last row (which is typically the next blank row) so the
can input data in that row.

I am stuck...thanks
 
Hi
maybe the shortcut CTRL+END is all you need (move the cursor to the
last row with data)

Frank
 
miker

Sub findbottom()
Worksheets("Sheet1").Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0).Activate
End Sub

Will select first blank row below data in Column A.

Note: excludes any blank rows interspersed throughout above the last row with
data because it starts from the bottom of the column and checks upward.

Gord Dibben Excel MVP
 
if the determination can be made on column A

cells(rows.count,1).end(xlup)(2).Select
 
Maybe one row after?, for the "next blank row":

ActiveCell.SpecialCells(xlLastCell).offset(1,0).Select
 
Thank you all. I went with Tom's Suggestion since I had conditiona
formatting and formulas through the "empty" rows...

Thank you all for replying
 
Back
Top