FIND LAST CELL WITH DATA
Here's a macro that will do it and show the value in a message box, is
this what you needed?
Sub LastValue()
Dim Mycell As Object
For Each Mycell In Range("E:E")
If Mycell.Value = "" Then
MsgBox Mycell.Offset(-1, 0)
Exit Sub
End If
Next
End Sub
Sandy
sharon wrote:
I am trying to display the last entry in a column. I am using the following
formula:
=LOOKUP(9.99999999999999E+307,E6:E4000)
My result shows up as zero if cell E4000 has nothing in it.
I am looking for a formula the looks at the entire E column and displays the
value of the last cell with a number in it.
|