Since you have tried a macro..try the below..If the first cell is not blank
try the below....

Dim varFound As Variant
Set varFound = Columns(1).Find("", LookIn:=xlValues, lookat:=xlWhole)
MsgBox varFound.Address

If this post helps click Yes
---------------
Jacob Skaria


"TomHull" wrote:

Hi,

I need a formula that finds the first empty cell at the bottom of a column
of data. I have tried using the find and select function in a macro and it
fails to find cells often. Have also tried using a MATCH formula but it
doesnt seem to like finding an empty cell.

Any Help,

Thanks

Tom