Finding Row of Last Occupied Cell In A Range

[Ark68]

I've Googled a solution to what I would believe to be an easy problem, but was unable to find anything similar to my situation.

I have a range E2:E15. What VBA solution would I use to return the row number of the last cell in that range that holds a value?

 

[Fluff]

Do you have formulae in the range that return "", or is it just hard values & blank cells?

 

[Ark68]

Hard values and blank cells.

 

[Fluff]

How about

Sub Ark68()
   Dim Fnd As Range
   Set Fnd = Range("E2:E16").Find("*", Range("E16"), , , xlByRows, xlPrevious, , , False)
   MsgBox Fnd.Row
End Sub

 

[Ark68]

Awesome! Thanks Fluff.

 

[Fluff]

You're welcome & thanks for the feedback