Assuming the shape you want to hide or delete is named "Star 1", two snippets of code you can use to do this are shown below. To do this, assign an action to a button that calls one of the following:


Sub HideShape
ActivePresentation.Slides(2).Shapes("Star 1").Visible = msoFalse
End Sub

Sub DeleteShape
ActivePresentation.Slides(2).Shapes("Star 1").Delete
End Sub