Destroy command button with a Macro?

[grasping@straws]

Any way to delete a command button once it's been clicked on?
(Thinking about a template with a one-time use button)

tm

 

[Bernie Deitrick]

tm,

Assuming the commandbutton was off of the control toolbox: At the end of
the Private Sub CommandButton1_Click() code, use a line like:

Worksheets("Sheet1").Shapes("CommandButton1").Delete

HTH,
Bernie
MS Excel MVP

 

[Paul B]

tm, if you just want to delete the button use something like this

Private Sub CommandButton1_Click()
Range("A1") = "test"
ActiveSheet.Shapes("CommandButton1").Delete
End Sub

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

 

[grasping@straws]

On Tue, 21 Dec 2004 11:18:41 -0500, "Paul B"

D'oh!..."Shapes".....ah, well...I'm learning (slowly)

Thanks both o' you.

tm