Benoist28200
XLDnaute Nouveau
Bonjour,
Est-il possible de paramétrer le bouton "annuler" de "Voulez-vous enregistrer ?".
Cordialement,
Est-il possible de paramétrer le bouton "annuler" de "Voulez-vous enregistrer ?".
Cordialement,
CHOIX = MsgBox("Voulez-vous enregistrer les modifications que vous avez apportées à " & ThisWorkbook.Name & " ?", vbExclamation + vbYesNoCancel)
Select Case CHOIX
Case vbYes
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.Quit
Application.DisplayAlerts = True
Case vbNo
Application.DisplayAlerts = False
Application.Quit
Application.DisplayAlerts = True
Case vbCancel
End Select