Hi,

The reason Jon and I are pointing these issues out is that your single line
of code is fine. The reason it fails is something else is wrong and Jon and
I can't see your code so we are just suggesting the most likely places.

Fact is, code that fails on a particular line can fail despite the fact that
the line is correct.
--
Thanks,
Shane Devenshire


"Jon Peltier" wrote:

Make sure variables are declared and defined, and make sure you reference
potentially indeterminate ranges.

Dim RN As Range
Dim wks As Worksheet
Dim r As Long

Set wks = ActiveWorkbook.Worksheets("My Sheet")
r = 100

Set RN = wks.Range(wks.Cells(2,1), wks.Cells(r, 1))

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______



"Daniel" wrote in message
...
What wrong with this. It create error. How can I improve to get rid the
error?

Set RN = Range(Cells(2, 1), Cells(r, 1))

Thanks
Daniel