Problem Deleting Rows 2

[mattygriff]

Probably a simple solution to this one but I can't for the life of me work out what the problem is. Here's my code.....

Sheet18.Unprotect

Sheet18.Range("A8:E9").Select
Selection.EntireRow.Delete

Sheet18.Protect

When I try and run this code I get a "Run-time error '1004': Select method of Range class failed" dialog.

So whose first up to make me look stupid?

 

[PHV]

What about something like this ?
Sheets("Sheet18").Range("A8:E9").EntireRow.Delete

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

 

[mattygriff]

PHV - thanks but that gives me a "Subscript out of range" error instead!

 

[PHV]

So, use an existing sheet's name.
BTW, have you several workbooks open ?

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

 

[SkipVought]

Your Sheet Object is MISS IDENTIFIED!

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[mattygriff]

Thanks, both.

PHV - Sheet18 is an existing sheet and I only have one workbook open.

Skip - Mis-identified how?

 

[SkipVought]

How?

Post you code please.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[mattygriff]

Skip,

My code is in the OP (for some reason my

delimiters didn't work!)

This seems like such a simple thing to do and I can't understand what the problem is - I've tried recording a macro to do what I need and it comes up with the same code as I've used.

 

[SkipVought]

The OP has problems!!!!

That's why!

Sheet18.Range("A8:E9").EntireRow.Delete

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[mattygriff]

Thanks, Skip - worked a treat.

Thanks also, PHV.