Arrêt ou poursuite de la macro selon la réponse à une msgbox

[alias_2003]

Bonsoir à tous,
j'aimerais savoir comment écrire le code qui me permettrait :
* si la cellule A1 < 0, qu'une msgbox apparaisse et demande "êtes-vous sûr de vouloir poursuivre ?"
* si oui, poursuite de la macro
* si non, arrêt de cette macro
Merci beaucoup de votre aide,
Bonne soirée,
Amicalement

 

[Papou-net]

Re : Arrêt ou poursuite de la macro selon la réponse à une msgbox

Bonsoir alias_2003,

Comme ceci :

If Range("A1") < 0 Then
Rep = MsgBox("Êtes-vous sûr de vouloir poursuivre ,", vbYesNo + vbQuestion, "CONTINUER")
If Rep = vbNo Then Exit Sub
End If
...
...
...
End Sub

Bonne soirée.

Cordialement.

 

[alias_2003]

Re : Arrêt ou poursuite de la macro selon la réponse à une msgbox

Bonsoir Papou-net et merci beaucoup 🙂 !
Amicalement