If you want to get rid of all

Sub ShapesCut()
For Each s In ActiveSheet.Shapes
s.Cut
Next
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"WBTKbeezy" wrote in message
...
Hello:

I am trying to write/record a macro that will clear out a worksheet in
specific ranges. It is easy to deal with the text portions, but the
worksheet
also contains a picture that also needs to be deleted, but the picture is
different each week and always has a different name. Is there a way to
select
a shape if I can't pinpoint the name value?
Thanks.