Form Control Button Name

[Incuss]

I have 2 Form Control Buttons that I have assigned macros to in Worksheet 1.
In one of the Buttons, my macro (among other things) copys Sheet 1 from
Worksheet 1, and pastes it into a New Worksheet and attempts to delete the
Control Buttons. The problem is, in Worksheet 1, my Control Buttons are named
"Button 4" and "Button 48". When Sheet 1 from Worksheet 1 gets copied to the
New Worksheet, the Control Buttons names change ("Button 2" and "Button 3" in
one test and "Button 4" and "Button 5" in another test on a different
machine).

How can i overcome this? (is there a wildcard i can use to specify deleting
all Control Buttons? or can i fix the name of he Control Button name when
being copied to the New Worksheet?)

 

[joel]

there are two different types of control buttons. One from the
controltoolbox toolbar and one from the Formstoolbar. The method is
slighly different


'control toolbox
Sub test()

For Each obj In Sheets("sheet1").OLEObjects
If TypeName(obj.Object) = "CommandButton" Then
obj.Delete
End If

Next obj

End Sub

'forms
Sub test1()
For Each obj In Sheets("sheet1").Buttons
obj.Delete
Next obj
End Sub


If you have more than one button on the page you may have to look at
the name of the button (what is displayon on the control) to determine
which on eto dlete.