How do I find the first empty cell in a range of cells in a column

I am trying to create a macro for a range of cells in a column which takes me to the first empty cell in that range, however when i am running the macro it goes to the bottom of that column. I have drop down menus in the range of cells for which i am making the macro (may be if this info could help)
My code is as follows
[/CODE]
Sub gemempty(Control As IRibbonControl)
Range("A14:A78").End(xlDown).Offset(1, 0).Select
End Sub
[/CODE]

I have attached a screenshot of where the cursor goes when i run the above macro.

Regards

Nirmall

Hi skywriter, u are a beauty, worked like a charm
Appreciate

Thread solved,thanks to skywriter,

thanks sixthsense too for offering an alternative, though did not try it

Hi, is it possible to highlight the empty cell in a particular color, so that i know where the cursor is???

Its fine, i am happy with your original code, i will just change On Err to On Error