Trouver astuce code vba

Résolu
Brabra -  
 Brabra -
Bonsoir, 

Sub Interpretation()

    If box_mesure = "- de 1,70 M" And box_cheveux = "BRUN-NOIR" And box_yeux = "NOISETTE" And box_age = "22 ANS" Then
        'aller sur la bonne feuille
        Sheets("BENJI").Select
    End If

    If box_mesure = "=  1,75 M" And box_cheveux = "BRUN-NOIR" And box_yeux = "BLEU" And box_age = "28 ANS" Then
        'aller sur la bonne feuille
        Sheets("FLORENT").Select
    End If
    
    If box_mesure = "+ de 1,80 M" And box_cheveux = "CHATAIN" And box_yeux = "VERT" And box_age = "21 ANS" Then
        'aller sur la bonne feuille
        Sheets("RAPHAEL").Select
    End If


Je vous explique :

En fait j'ai un questionnaire à choix multiple qui m'envoie, quand je choisi certaines réponses, sur une page demandée.
J'aimerais, car j'ai 4 questions et 12 choix différents de réponses, avoir un code qui, si je ne choisis pas l'une des réponses d'au dessus, m'envoie sur une autre page qui serait comme une "page d'erreur' pour dire que c'est un mauvais choix. Comme ca je n'aurais pas à recopier plus d'une quarantaine de fois chaque code pour chaque valeur...

Merci

2 réponses

Réponse 1 / 2
Frenchie83 Messages postés 2240 Date d'inscription   Statut Membre Dernière intervention   338
 
Bonjour 
If box_mesure = "- de 1,70 M" And box_cheveux = "BRUN-NOIR" And box_yeux = "NOISETTE" And box_age = "22 ANS" Then
        'aller sur la bonne feuille
        Sheets("BENJI").Select
    ElseIf box_mesure = "=  1,75 M" And box_cheveux = "BRUN-NOIR" And box_yeux = "BLEU" And box_age = "28 ANS" Then
        'aller sur la bonne feuille
        Sheets("FLORENT").Select
    ElseIf box_mesure = "+ de 1,80 M" And box_cheveux = "CHATAIN" And box_yeux = "VERT" And box_age = "21 ANS" Then
        'aller sur la bonne feuille
        Sheets("RAPHAEL").Select
    Else
        'aller sur la feuille "ERREUR"
        Sheets("ERREUR").Select
    End If

Si aucun des choix ne correspond, alors on pointe sur la feuille "ERREUR"
cdlt
0
Brabra
 
Cela fonctionne !!! Je vous remercie !!
0
Réponse 2 / 2
Brabra
 
Par contre, si j'essaie de l'étendre à une seconde page avec la même forme de questionnaire mais avec des données différentes et il ne prend pas en compte la modifications des données mais prend toujours en compte les anciennes données... Est ce normal ?

Cordialement
0