Microsoft 365 Retrouver dans une cellule un mot d'une liste et l'afficher

[Davdistri]

Bonjour à tous,

Je suis un nouvel arrivant sur le forum
Mille mercis d'avance pour votre aide et vos lumières !!!!

J'ai dans l'onglet A COMPLETER en G16 une valeur.
J'ai dans l'onglet FEUILLE DE BROUILLON une liste de B4 à B6, cette liste va s'étoffer
Je souhaite en J6 rechercher en G16, s'il existe un des mots de la liste dans l'onglet FEUILLE DE BROUILLON et renvoyer ce même mot (dans cet exemple, le mot est Grigio)

J'ai chercher depuis 1.5 jours, mais je sèche complètement.

Pourriez vous me sauver svp

Bonne soirée à tous

 

[sylvanu]

Bonsoir Davdistri, et bienvenu sur XLD,
Acceptez vous le VBA ?
Si oui un essai en PJ avec une fonction perso :

Function Couleur(C$)
    T = [Tableau1]
    For i = 1 To UBound(T)
        If InStr(1, LCase(C), LCase(T(i, 1))) > 0 Then
            Couleur = Couleur & T(i, 1) & "  "
        End If
    Next i
    If Couleur = 0 Then Couleur = ""
End Function

La syntaxe est =Couleur(Cellule à analyser)

 

[herve62]

Bonsoir
Houlà !!!!! Un peu complexe , c'est du ressort de la BDD plutôt ?? ( requête Access)
Là même avec du VBA ??
D'ailleurs si pas de réponse ici c'est que c'est loin d'être évident

 

[Phil69970]

Bonjour à tous

@Davdistri

Ma version ... selon ce que j'ai compris ...

Merci de ton retour

@Phil69970

 

[Davdistri]

Bonjour la team,

Merci pour votre retour, c'est parfait

Excellente journée.

Bien à vous,

 

[Phil69970]

@Davdistri

La logique est de valider le post contenant la réponse que tu as choisi et non pas ton propre post car tu n'as rien trouvé du tout

==> On ne sait toujours pas quelle solution qui te convient !

@Phil69970