Assume A1 on Sheet1 holds the Text "U4" without the double quotes

Dim s as String
Wtih Activeworkbook.Worksheets("Sheet1")
s = .Range("A1")
Application.Goto .Range(s)
End with

If that isn't what you want, then perhaps providing a clearer explanation
would help.

--
Regards,
Tom Ogilvy


"Alex" wrote:

I am trying to select a range that is defined in a cell on sheet 1. this is
what i have but am getting no place with it. any ideas?

ActiveWorkbook.Sheet1.Range.Value=("u4").Select