Réponse à un Inputbx

[Luicoaat]

Bonsoir,
J'ai mis en place un inputbox demandant de rentrer une valeur. Je voudrais que si l'utilisateur clique sur OK alors la macro continue mais si il clique sur ANNULER alors ça s'arrête.
Je sais que pour les msgbox il y a des codes (4 pour OUI ou NON, 5 pour OUI, NON ou ANNULER,...) Existe-t-il aussi des codes pour inputbox??

Merci

A bientôt

 

[Catrice]

Re : Réponse à un Inputbx

Bonsoir,

tu peux tester à travers une variable :

Sub test()
Var = InputBox("Mon message")
If Var = "" Then
Exit Sub
Else
'Moncode
End If
'Si l'utilisateur clique sur OK ou appuie sur ENTRÉE , la fonction InputBox renvoie le texte contenu dans la zone de texte. Si l'utilisateur clique sur le bouton Annuler, la fonction renvoie une chaîne de longueur nulle ("").
End Sub

 

[kjin]

Re : Réponse à un Inputbx

Bonsoir,
Annuler renvoie une chaine vide, idem s'il n'y a pas eu de saisie

Sub Bonjour()
Dim Rep As String
Rep = InputBox(Prompt:="Quel est votre nom?")
If Rep = Empty Then
Exit Sub
Else
MsgBox "bonjour " & Rep
End If
End Sub

A+
kjin