Supprimer bouton macro apres creation classeur

Bonjour,

J'ai créé un bouton macro qui me permet de créer un nouveau classeur excel avec comme nom la cellule B1.
Une fois le classeur créé, je voudrais supprimer le bouton macro uniquement sur se nouveau classeur.
Qulqu'un à un idée??

Private Sub CommandButton1_Click()
ActiveWorkbook.Save
monfichier = "C:\test\" & "ATS-" & Sheets("feuil1").Range("B1").Value
If Dir(monfichier & ".xls") <> "" Then
MsgBox ("Un fichier de ce nom existe déjà, veuillez le supprimer/déplacer avant nouvelle copie")
Else
monfichier = monfichier & ".xls"
ActiveWorkbook.SaveAs Filename:= _
monfichier, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
MsgBox ("Fichier créé dans C:\test\")
End If
End Sub