View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Don A Don A is offline
external usenet poster
 
Posts: 1
Default Last cell in column

I wrote a macro that does this as below:
' EndDown Macro
Sub EndDown()
If Selection Is Nothing Then Exit Sub
State = IsEmpty(ActiveCell)
For rw = ActiveCell.Row + 1 To Application.Rows.Count - 1
If IsEmpty(Cells(rw, ActiveCell.Column)) < State Then
Exit For
Next rw
ActiveWindow.ScrollRow = rw
Cells(rw, ActiveCell.Column).Activate
End Sub

-----Original Message-----
Searching for a command that will show me the LAST value

in a column. Not the
largest, but the last. Any help0 greatly appreciated.
.