Sub Test1()

Dim rng As Range

Set rng = Range(Cells(1), Cells(5, 5))

Test2 rng

End Sub


Sub Test2(rng As Range)

MsgBox rng.Cells.Count

End Sub


RBS


"Barb Reinhardt" wrote in message
...
I've got a worksheet_selection change event and under certain
circumstances,
I'd like to call another procedure. I need to pass the TARGET range to
that
other procedure. How do I do this? I've tried a couple of things that
don't seem to work.

Thanks