Try:
MyInput = "http://finance.yahoo.com/q?s=" & InputBox("Enter Stock Symbol")
ActiveWorkbook.FollowHyperlink Address:=MyInput
--
Steve Franks


"Tom Ogilvy" wrote:

ISub AAA()
Dim MyInput
MyInput = InputBox("Enter Stock Symbol")
ActiveWorkbook.FollowHyperlink _
Address:="http://finance.yahoo.com/q?s=" & MyInput

End Sub

Worked fine for me. When I entered a valid symbol, it opened that as a web
page.

--
Regards,
Tom Ogilvy






"gj" wrote in message
oups.com...

gj wrote:
Trying to put InPut answer into hyperlink

Dim MyInput
MyInput=InputBox("Enter Stock Symbol")
ActiveWorkbook.FollowHyperlink _
Address:="http://finance.yahoo.com/q?s=MyInput

don't work Tom
gj