Try removing the .Address property call from the end of the Range (Address
returns a String value... you need an object to be assigned to the ranger
range).

--
Rick (MVP - Excel)


"NDBC" wrote in message
...
I need to return a range to send it to a function. This is what I am using

Set ranger = Range(Cells(TRow, 14), Cells(TRow, TCol + 3)).Address

It doesn't seem to work. All the variables are correct in debugger but the
ranger (dim as range) is "nothing".

Thanks again