Maybe this?

Sub SelectBlank()
On Error Resume Next
Range("K2:V2").SpecialCells(xlCellTypeBlanks)(1).S elect
End Sub

--
Rick (MVP - Excel)


"Hal" wrote in message
...
I have the range K2:V2. I want to start at K2 and check if the cell is
empty.
If so select it, if not, check L2, M2 . . . V2 until the first empty cell
in
this range is found, and then select it. The code below will work but I
would
like to have something more professional.

Signed, Novice at work


If Range("K2").Value = "" Then
Range("K2").Select
Elseif Range("L2").Value = "" Then
Range("L2").Select
.
.
.
Else
Range("V2").Select