Message box

Lamoriciere

XLDnaute Nouveau
Bonjour,

Je désire connaître la raison pour laquelle une MsgBox avec les boutons OKCancel ne se ferme pas quand on clique sur Cancel. Mais au contraire la macro se poursuit comme si de rien n'était.

D'avance merci à tous
 

Dan

XLDnaute Barbatruc
Re : Message box

Bonsoir,

Le mieux serait de voir ta macro ici. Le CANCEL est en quelque sorte une action qui annule ce que tu veux faire.
Il te faut alors peut être choisir NO en lieu et place et adapter le code

A te lire
 

jp14

XLDnaute Barbatruc
Re : Message box

Bonjour

Il faut intercepter la réponse et ensuite la tester
Ci dessous un exemple de macro
:input1
' affichage boite de saisie

' confirmation de la réponse
Dim Title1 as string
Dim Msg As String
Dim Style As String
Dim Reponse2 As String
Title1 = " " 'Titre de la zone de saisie
Msg = ' variable qui contient la réponse de la boite de saisie
Msg = Msg & (Chr(13) & Chr(10)) & " " ' on rajoute une ligne dans la boîte
Style = vbYesNoCancel + vbCritical + vbDefaultButton2
' Affiche le message pour validation.
Reponse2 = MsgBox(Msg, Style, Title1)
If Reponse2 = vbYes Then .......
If Reponse2 = vbCancel Then Exit Sub
If Reponse2 = vbNo Then GoTo input1' retour à la question précédente

JP
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
311 725
Messages
2 081 942
Membres
101 849
dernier inscrit
florentMIG