This should be what you need!
Application.Goto Reference:=Range("A1").Value
Regards,
Simo
--
Simon Lloy
-----------------------------------------------------------------------
Simon Lloyd's Profile:
http://www.excelforum.com/member.php...nfo&userid=670
View this thread:
http://www.excelforum.com/showthread.php?threadid=55173