annulation inputbox

[slim82]

Bonjour,

j'ai réalisé une petite macro utilisée par plusieurs personnes et j'ai un souci...
lorsque la macro est lancée par erreur, l'utilisateur clique sur "annuler" ce qui ouvre la msgbox "débogage".

Je souhaiterai que le bouton "annuler" de la msgbox mette fin simplement à la macro...

Est ce que quelqu'un a une solution ....

 

[MJ13]

Re : annulation inputbox

Bonjour Slim82

A tester:

Sub Demande()
choix = inputbox("Quel est votre choix (1 ou 2)?")
If choix = "" Then Exit Sub
ActiveCell = choix
End Sub

 

[Gourou AWK]

Re : annulation inputbox

Essai ce petit bout de code

Public Sub Test()
    
    If MsgBox("Coucou", vbOKCancel, "Exemple") = vbCancel Then Exit Sub
    MsgBox "Pas Sorti"
End Sub

 

[slim82]

Re : annulation inputbox

merci à vous,

MJ13, ta solution que j'avias testé et qui ne fonctionnais pas, fonctionne... peut etre une erreur d'écriture...

A+