Rows("1:15").Name = "Range" & Range("A1")

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"firsttimer" wrote in message
...
Hi,

I have several ranges defined( range1=$1:$15, range2=$16:$20,
range3=$20:$30)

Depending on a cell value I want to insert one of tese ranges.
e.g.
InsRange("range"&A1)

Is should be possible with a VBA function, but I dont have any VBA
experience