On Feb 7, 6:18*am, Ron Rosenfeld wrote:
On Thu, 7 Feb 2008 06:08:41 -0800 (PST), wrote:
The following seems to do the job. *But can this be improved?
Dim rng as Range
Set rng = Range(Range("C3").End(xlDown).Address)

Rather:
Dim c As Range
Set c = Range("c3").End(xlDown)

Thanks to all who pointed this out. Klunk! I misread the Help page,
then I proceeded to confuse myself when I did `debug.print
range("c3").end(xldown)`.