Select named range
Sub GotoName1() Application.Goto Reference:= _ ActiveWorkbook.names("NameArea").Name End Sub