Test réponse sur l’entrée dans une inputbox

Résolu/Fermé

mijean94 Messages postés 394 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 8 novembre 2021 - 13 mars 2016 à 23:46
mijean94 Messages postés 394 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 8 novembre 2021 - 14 mars 2016 à 20:55

Bonjour,

Sur mon code si dessous je ne trouve pas la solution pour après l’entrée de la donnée dans l’Inputbox ;

a) s’il y a validation avec OK et qu’il n’y a rien de saisie reposé la question à l’Inputbox, ne pas sortir
b) si à la question vous avez demandé une recherche ….. la réponse est nom revenir à l’Inputbox, ne pas sortir.

Sub recherche_image()
Dim monchoix As String
'*****
monchoix = InputBox("Veuillez saisir le nom de votre recherche")
'*****
If monchoix = "" Then
        MsgBox "vous avez annulé où il n'y a pas de donnée d'entrée"
    Exit Sub
    End If
'*****
If MsgBox("Vous avez demandé une recherche sur un dessin de :  " & monchoix, vbQuestion + vbYesNo) <> vbYes Then
    Cancel = True
    ' Affichage de ton formulaire
    Sheets("feuil1").Select
   Exit Sub
    Else
  End If
'********
 MsgBox "Vous allez être redirigé vers internet pour afficher votre recherche:" 
'*** choix sur google image

End Sub

Merci pour votre aide.

Bien cordialement

A voir également:

Inputbox vba plusieurs entrées
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
Vba range avec variable ✓ - Forum VB / VBA
Erreur 1004 vba ✓ - Forum VB / VBA
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
Find vba - Astuces et Solutions

7 réponses

Réponse 1 / 7

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
14 mars 2016 à 08:28

Bonjour,

Voir ceci, a adapter:

http://www.info-3000.com/vbvba/boucledoloopwhileuntil.php

Réponse 4 / 7

mijean94 Messages postés 394 Date d'inscription mercredi 16 décembre 2015 Statut Membre Dernière intervention 8 novembre 2021 10
14 mars 2016 à 16:24

Bonjour,

Merci pour la réponse, mais je souhaiterais aussi ne pas sortir de la fenêtre si on tape OK sans rien avoir renseigné ?

Ya t-il une solution

bien cordialement

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
14 mars 2016 à 18:00

As-tu essayé le code ci-dessus!

Discussions similaires

VBA : une input box à plusieurs entrées ?

Pas de prise RCA sur le téléviseur

Répeteur Wifi à partir d'une prise RJ45

Problème avec pes 2016

comment faire tableau à double entrée word 2013 ?

Musique (film) d'arrivée épique

Discussions similaires

Newsletters