Procedure to pass a dynamic named range

[djpratt]

I have a table and it named emTbl and a macro to select it.
Sub SelectEmTbl()
‘Select EmTbl
Application.Goto Reference:="EmTbl"
End Sub
This works fine but I’m wanting a generic procedure like
SelectRange(EmTbl)
So, how do you modify the procedure to pass a dynamic name range?
It looks easy but I can’t get it.
TIA

 

[doubledaffy]

Try:

Range(EmTBl).Select

 

[djpratt]

When I tried Range(EmTBl).Select I got an error. But this is not what I'm looking for.
Application.Goto Reference:="EmTbl" Does work for me. It selects a table named EmTbl. What I want to learn to do is to put that command in a macro and pass the name to it. Something like
SelectRange(EmTbl)

Sub SelectRange(Byval rRng as Range)
Application.Goto Reference:=rRng
End Sub

What do I need to do to get this macro to work? It looks like it would be easy but I can't get it.

 

[djpratt]

I solved my problem. The named range is passed as a string, not a range. So this is all I had to do.

Sub SelectRange(Byval sRng as String)
Application.Goto Reference:=sRng
End Sub