Bonsoir,
Qu'est-ce qui ne fonctionne pas ?
Tu as une procédure classeur dans un module de feuille, elle n'est pas à sa place, et n'a aucune chance de se déclencher.
Elle est de toute façon inadaptée : ce n'est pas BeforeClose qu'il faut programmer, mais BeforeSave !