Remember that you can only select a range on a worksheet that's active.

You may need:

thisworkbook.activate
worksheets("summary report").select
rngdate.select

if you don't use application.goto.



Nick Smith wrote:

Using the following code

Dim RngDate As Range
Set RngDate = ThisWorkbook.Worksheets("Summary Report").Range("A" & i)
ThisWorkbook.Worksheets("Summary Report").Range(RngDate).Select

Fails at line 3 with the following error:

Application Defined or object defined error.

Can anyone help me please?

Thanks.

Nick

--

Dave Peterson