... ATTENTION, ce classeur contient une macro en ouverture.
If Reponse = vbNo Then ThisWorkbook.Close False
Me.Saved = True 's'il y a des liaisons mises à jour ou des formules volatiles
If Reponse = vbNo Then If Workbooks.Count = 1 Then Application.Quit Else Me.Close