Removing a macro button after execution

[Bishop]

I have created a button and have assigned a macro to it. How do I code the
existing macro to delete the button once the macro has executed?

 

[Per Jessen]

Hi

Why not just make the button invisible?
Well, the below macro gives an example of both solutions.


Private Sub CommandButton1_Click()
msg = MsgBox("Hello")
Me.CommandButton1.Visible = False
'Me.CommandButton1.Delete
End Sub

Regards,
Per

 

[Don Guillett]

The trick is to know the name

Sub deleteshapeafterrunningmacro()
MsgBox "hi"
With ActiveSheet
.Shapes("Rectangle 3").Cut
End With
End Sub