determine last row

  • Thread starter Thread starter mackie
  • Start date Start date
M

mackie

thanks jason..
actually what i really want to do is..
lets say i received a worksheet with
1) rows up to 10
2) rows up to 100

i would like to create a macro that will position my cell
pointer to worksheets samples

1) A11
2) A101

thanks again
 
One way:

Public Sub ActivateFirstBlankInA()
With Range("A" & Rows.Count)
If IsEmpty(.Value) Then
.End(xlUp).Offset(1, 0).Activate
Else
.Activate
End If
End With
End Sub
 
Hi

I got an answer from Melanie Breden to an almost same question today in NG
microsoft.public.excel.programming. The thread is 'Excel2000: finding last
row of used range'.
 
thanks a lot...

-----Original Message-----
One way:

Public Sub ActivateFirstBlankInA()
With Range("A" & Rows.Count)
If IsEmpty(.Value) Then
.End(xlUp).Offset(1, 0).Activate
Else
.Activate
End If
End With
End Sub


.
 
Back
Top