Application-defined or object-defined error

[pho01]

On my Excel macro, I had:

Set r1 = Sheet1.Range(Cells(2, 1), Cells(1000, 3))

Step into the code, it returns error
Run-time error '1004': Application-defined or object-defined error

Any idea why it is complaining that?

FYI: This is regarding to testing the script on the posting:

http://tek-tips.com/viewthread.cfm?qid=1479998

THanks!

 

[SkipVought]

Try this, referencing all range objects...

Set r1 = Sheet1.Range(Sheet1.Cells(2, 1), Sheet1.Cells(1000, 3))

or

with Sheet1
  Set r1 = .Range(.Cells(2, 1), .Cells(1000, 3))
end with

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[PHV]

Or:
Set r1 = Sheet1.Range("A2:C1000")

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886