deleting form controls by code

[Bri]

Hello

I' like to USE CODE to delete controls from a worksheet. I hope to use the
code on several sheets.

I used 'Record Macro' to come up with the following, which works well on the
1st sheet ...

Application.CommandBars("Drawing").Visible = True
ActiveSheet.Shape.Range(Array("chbx1", "chbx2", "optbx1")).Select
Selection.Delete
Application.CommandBars("Drawing").Visible = False

The problem is that different sheets have different numbers of controls,
sometimes with different names, so the Array part of the code above crashes.
What code can I use to delete all form controls from a given page?

Thank you
Bri

 

[Ron de Bruin]

Hi Bri

See
http://www.rondebruin.nl/controlsobjectsworksheet.htm

 

[Bri]

Ron - MOST helpful
Thanks
Bri