Sub ボタン_テキストボックス_グラフ_オブジェクトを削除する()
    
    Worksheets("Sheet1").Shapes.Range("ボタンの名前").Delete
    Worksheets("Sheet1").Shapes.Range("テキストボックスの名前").Delete
    Worksheets("Sheet1").Shapes.Range("グラフの名前").Delete

End Sub