This may be what you are looking for....

Sub SelectNextEmptyCell()
On Error Resume Next
Range("B2:AF13").SpecialCells(xlCellTypeBlanks)(1) .Select
End Sub

However, if I am right, you could end up picking the wrong cell at the end
of short months (Feb 29th of a non-leap year, April 31st, etc.).

--
Rick (MVP - Excel)



"Stilltrader47" wrote in message
...
My worksheet is set-up for 12 month price tracking. The entry range is 12
rows (months) by 31 columns (days). How can I write a macro that will
locate
the cursor to the next empty cell in the range? What I am looking for is
an
efficient "find" command. I would prefer to execute by ctl-(letter) if
possible.

Thanks for helping.