Menu

Ecriture VBA: action en réponse à choix msgbox

bastien07100 1 Messages postés jeudi 8 février 2018Date d'inscription 8 février 2018 Dernière intervention - 8 févr. 2018 à 17:20
Bonjour,

J'aimerais que quand une personne ferme ce fichier, une boite de dialogue s'ouvre et demande s'il a bien entré son nom et la date dans les cases prévues à cet effet:
- si oui, l'action se poursuit et je peux enregistrer avant de quitter
- si non, la fermeture du fichier est bloquée on se retrouve automatiquement sur la page à renseigner.
Voici ce que j'ai trouvé qui ressemble visuellement à ce que je veux, mais qui n'a pas du tout les fonctionnalités espérées:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Msg = "Avez-vous inscrit votre nom et la date de la dernière mise à jour sur la feuille du mode opératoire?"
StyleBoîteDialogue = vbYesNo + vbQuestion
Title = "Avant de fermer ce fichier"
réponse = MsgBox(Msg, StyleBoîteDialogue, Title)
End Sub

A l'aide!!
Afficher la suite