Confirmation de sortie d'excel
jalonene
-
jalonene -
jalonene -
Bonjour,
Je mets à disposition un fichier excel à des utilisateurs qui doivent effectuer une opération particulière, s'ils ne la font et quittent l'application, je souhaite faire apparaître une userform (cela je l'ai fait) avec un choix de confirmation de sortie. A la réponse "non" on retourne dans l'application. C'est cette commande que je ne connais pas (en fait c'est la même, je suppose, qu'excel propose quand on quitte sans avoir enregistré).
Merci pour votre aide
Je mets à disposition un fichier excel à des utilisateurs qui doivent effectuer une opération particulière, s'ils ne la font et quittent l'application, je souhaite faire apparaître une userform (cela je l'ai fait) avec un choix de confirmation de sortie. A la réponse "non" on retourne dans l'application. C'est cette commande que je ne connais pas (en fait c'est la même, je suppose, qu'excel propose quand on quitte sans avoir enregistré).
Merci pour votre aide
Configuration: Windows XP Firefox 2.0.0.14
1 réponse
-
Bonjour Jalonene
Il faut activer la sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
End Sub
et placer dedans le code qui pose la question souhaitée
espéranbt avoir aidé,
frantzb-
Merci Frantzb de ta réponse, j'ai bien fait cela, mais c'est certainement le code que j'ai mis à l'intérieur qui ne va pas.
Voilà ce que j'ai écrit:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ([OK_sauvegarde] = "NON") Then
UserForm1.Show
End If
End Sub
L'UserForm1 pose la question de savoir si on veut quitter l'application, avec un bouton "oui" et un bouton "non".
pour le bouton "oui" pas de problème
Private Sub CommandButton1_Click()
Application.Quit
End Sub
Pour le bouton "non" c'est là le hic!
Private Sub CommandButton2_Click()
Cancel = True
' Unload Me
End Sub
Si je mets Unload me, je quitte excel, si je ne le mets pas je n'arrive pas à sortir de l'userform1 sauf en cliquant sur la croix rouge ce que je veux éviter.
Merci pour vos conseils.
-
