VbNo => poursuivre là ou on s'est arrêté

TgR · 18 Février 2013

Bonjour,

Je suis en train de me demander comment réaliser ceci :

J'ai une inputbox dans laquelle se trouve un certain nombre de ComboBox. Cette inputbox possède un bouton "quitter". J'ai inséré ceci sur ce bouton

Select Case MsgBox("Voulez vous vraiment quitter ?", vbYesNo + vbQuestion, "Quitter l'application")
Case vbYes
ThisWorkbook.Close Savechanges:=True
Case vbNo

End Select

Je ne sais pas comment configurer le vbNo de manière à ce que lorsque l'on clique dessus, l'utilisateur reprenne là où il en était. Actuellement s'il clique sur "non", l'inputbox se ferme...

Merci pour votre aide !

TgR

pierrejean · 18 Février 2013

Re : VbNo => poursuivre là ou on s'est arrêté

Bonjour TgR

L'inputbox se fermera toujours apres reponse !!

teste ceci

Code:

reponse = MsgBox("Voulez vous vraiment quitter ?", vbYesNo + vbQuestion, "Quitter l'application")
If reponse = vbYes Then ThisWorkbook.Close Savechanges:=True
MsgBox ("suite")

VbNo => poursuivre là ou on s'est arrêté

TgR

Guest

pierrejean

XLDnaute Barbatruc

Discussions similaires

VbNo => poursuivre là ou on s'est arrêté

TgR

Guest

pierrejean

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency