"Alan Beban" wrote...
....
Doesn't do it; if you want the first row in Column A to control try

Range("Y" & Range("A1").End(xlDown).Row).Value = "GM"

If you want Column B to control, change the A1 to B1

Doesn't work if A1 (or B1) is the only nonblank cell in its column. And if
A1:A# were all nonblank, this would give the bottommost row in that range of
nonblank cells.

If col A should control, shouldn't this be

Range("Y" & IIf(IsEmpty(Range("A1").Value), _
Range("A1").End(xlDown).Row, 1)).Value = "GM"