Sub removeAll()
ActiveSheet.Shapes.SelectAll
Selection.Delete
End Sub

Stan Scott
New York City

"TimO" wrote in message
...
Hello All,

Is there a simple code to delete all Option buttons,
command buttons, etc from a worksheet.

Thanks