fermer par bouton

bonjour le forum
j'ai inclus à une feuille un bouton de fermeture du fichier. je voudrais 'obliger' l'utilisateur à utiliser ce bouton (calcul de temps de tâches) et donc empêcher 'Fichier/Fermer' et autre icône 'X'. j'ai trouvé sur ce site le verrouillage total de
Private Sub Workbook_BeforeClose(Cancel as Boolean)
Cancel = True
End Sub
est-il possible de l'adapter à mon 'bouton magique' ? Ou alors y a t-il une autre façon de procéder ?

merci d'avance de votre attention et de vos bons conseils,
et bonne fin de journée à tous.
serge.