Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "Je suis content de l'utilisation de ce classeur que j'ai conçu pendant ma période de stage." & vbLf & "Merci à tous de votre accueil." & vbLf & vbLf & "LUCANO", vbInformation, "Lucano"
End Sub