I have this code I've been working on and it dosn't work


Code:
--------------------

Sub MakeHyperlink()
Range("B8").Select

Do Until ""
Application.OnKey "F2"
Application.OnKey "HOME"
Application.OnKey "Del"
Application.OnKey "Enter"
ActiveCell.Offset(0, 1).Select
Loop

End Sub

--------------------


and I want it to loop until there is nothing in the selected box


--
tim64
------------------------------------------------------------------------
tim64's Profile: http://www.excelforum.com/member.php...o&userid=23295
View this thread: http://www.excelforum.com/showthread...hreadid=380569