Getting a value from a cell referenced relative to a named range

I'm trying the get a value from a cell on another sheet which is 6 rows above a named range (there are lots of ranges). How do I get the value without selecting or "Application.Goto" the actual cell. There must be a simpler way than what I have done below.

Dim iNum As Integer  

    Application.Goto Range("EVENT" & [a3])
    iNum = ActiveCell.Offset(-6, 0).Value

Thank you.

Try

inum = Range("EVENT" & [A3])(1).Offset(-6)

Or


inum = Range("EVENT" & [A3]).Cells(1, 1).Offset(-6)