Message box

[Lamoriciere]

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

 

[Pierrot93]

Re : Message box

Bonsoir Lamoricière,

oui logiquement la msgbox se ferme, pour t'en dire plus il faudrait voir le fichier et le code associé.

bonne soirée
@+

 

[Dan]

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]

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