Hi JLGWhiz

Thanks for your reply.

OOps. *Better qualify the shapes:

For i = Sheet2.Shapes.Count To 1 Step -1
* * *Sheet2.Shapes(i).Delete
Next


No, that did not fix the problem. Just to re-phrase my scenario -
sheet1 is the active sheet, and is protected, the shape is on sheet2,
and sheet2 is un-protected. I get a 1004 error every time, both on
xl2000 & 2003, on different machines. Set it up that way and see if
it fails for you.

regards,

DaveU