add vba code to existing command button code so it will delete only the shapes in a certain range

[slivesay]

I have a simple vba code linked to a command button to clear a range of cells. I would like to add come coding to this to delete a certain shape in the same range of cells.

The shape is a: msoAutoShape

code:

Range("A4:S360").Select
Selection.SpecialCells(xlConstants).ClearContents
Range("A4").Select

I have formulas in this range, so that is why I'm using the this particular coding.

Any help would be most apprecaited!!!!

 

[Zot]

It is related to Shape type

You will get the idea from this

Excel VBA - Delete Shapes in a Range

Hello; I have an Excel application I'm using to import product images and allow the user to supply information about their products. After selecting images to insert, I'm using this code to insert filenames and thumbnails: For f = 1 To UBound(files) .[b65536].End(3)(2) =...

www.mrexcel.com