EntireRow.Delete line not working - Office 2010

[Fyr]

It works correctly with excel 97 to 2003, but new versions give application-defined or object-defind error's.

With Workbooks("book1.xls").Sheets("sheet1")
   .Cells(Rows.Count, "A").End(xlUp).EntireRow.delete
End With

What changed?

Thanks for taking a look!

 

[texasalynn]

normally the sheet name is "Sheet1" you have a space after sheet.

Which line does it fail on?

 

[Fyr]

It fails on .Cells(Rows.Count, "A").End(xlUp).EntireRow.delete

 

[Fyr]

I failed to mention the line being deleted belongs to a hidden workbook.
Book1.xls is hidden from view.

 

[shg]

Try

.Cells([SIZE=3][COLOR=red][B].[/B][/COLOR][/SIZE]Rows.Count, "A").End(xlUp).EntireRow.Delete

Otherwise Rows refers to the active sheet, which may have more rows than Sheet1 in Book1

 

[Fyr]

Thanks shg, that did the trick!!