Try this

Sub test()
Dim lr As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
Cells(lr, "B").Select
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl


"JohnDK" wrote in message
...

if column b is empty but i want to select the cell in column b next to
the last cell with value in column a, how can i select the empty cell
in column b.


Range("A1").Select
Selection.End(xlDown).Select
??

Thanks


--
JohnDK
------------------------------------------------------------------------
JohnDK's Profile: http://www.excelforum.com/member.php...fo&userid=7184
View this thread: http://www.excelforum.com/showthread...hreadid=485700