Gérard DEZAMIS

Bonjour Joemis

A placer dans Thisworkbook (Avec Alt + F11)

Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox " Vous voulez quitter ? "
End Sub

Bien sûr pour appeler ta macro remplacer Msgbox ....
par call Nom_de_ta_macro

Je pense que cela peut convenir

@+
GD