Hello;

I have an Excel spreadsheet which I use to import images and create sort of a product catalog. It's working great.

However, I'm unable to come up with code that works for clearing/resetting the page. I've tried 3 or 4 different ways without any success.

What I need to do is clear all cell contents and shapes (images) within every column but "A". Anybody have a code sample that would do this??

Thanks in advance for your help. I appreciate it!

Rick

Activesheet.Range("B:IV").ClearContents
for each shp in ActiveSheet.Shapes
shp.delete
Next

--
Regards,
Tom Ogilvy



"Rick" wrote in message
...
Hello;

I have an Excel spreadsheet which I use to import images and create sort
of a product catalog. It's working great.

However, I'm unable to come up with code that works for clearing/resetting
the page. I've tried 3 or 4 different ways without any success.

What I need to do is clear all cell contents and shapes (images) within
every column but "A". Anybody have a code sample that would do this??

Thanks in advance for your help. I appreciate it!

Rick

Thanks Tom. It looks like that would delete all shapes on the sheet. I have two command buttons and a graphic in column A that I would like to retain while deleting the shapes on the rest of the sheet. Any ideas? Thanks in advance

Rick