Bouton menu juste pour 1 classeur

Bonjour à tous,

J'ai trouvé, à quelque part sur le forum (CreationMenu.zip), un code pour créer un bouton dans le menu d'un classeur. Je n'ai pas réussi à comprendre tout le code mais j'ai été capable d'adapter ce que j'avais besoin. Il me manque juste un petit détail, comment faire pour que ce code s'ouvre seulement pour le classeur X ?

Merci à l'avance


Voici le bout de code que j'ai conservé et en fichier joint je retransmet ce que j'avais trouvé.

Sub MenuOpen()

On Error Resume Next
CommandBars('Page d'acceuil').Delete

Set aMenu = Application.CommandBars(1).Controls.Add(Type:=msoControlPopup, Temporary:=True)
aMenu.Caption = 'Page d'acceuil'

With aMenu


Set Bouton = .Controls.Add(msoControlButton)
With Bouton
.OnAction = 'usfrm'
.Caption = 'Ouverture'
.BeginGroup = True
End With

End With

End Sub



Sub usfrm()
Ouverture.Show
End Sub [file name=CreationMenu.zip size=34098]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CreationMenu.zip[/file]