Chercher une liste de caractères dans une cellule à partir d'une liste

Bonjour à toute la communauté,

j'ai besoin de votre aide. Je vais tacher de faire simple.

Disons que :

En colonne C j'ai le nom de plusieurs villes

En face en colonne D, j'ai les pays correspondants.

En cellule A1 : Ville de paris

J'aimerais trouver une formule qui :

1. reconnait la ville dans la cellule A1 parmi la liste des villes en colonne C

2. et qui va piocher dans la colonne D pour me donner son pays correspondant

La difficulté se situe sur le fait que dans ma cellule A1 je n'aurai pas forcément juste marqué le nom de la ville.

L'index equiv ne fonctionne donc pas à mon sens

Auriez-vous une idée?

Merci d'avance

Alanou

Je pense que vous pouvez faire sa avec un tableau croiser dynamique.

voici une vidéo qui pourras vous expliquer comment faire :

https://www.youtube.com/watch?v=OlypTkG3M7U

LouisVolat a écrit :

Je pense que vous pouvez faire sa avec un tableau croiser dynamique.

voici une vidéo qui pourras vous expliquer comment faire :

https://www.youtube.com/watch?v=OlypTkG3M7U

Bonjour Louis, je ne pense pas qu'un TCD puisse m'aider à traiter ce problème... mais merci quand même pour votre aide

Bonjour,

Joins un fichier,

Cordialement,

massari59264 a écrit :

Bonjour,

Joins un fichier,

Cordialement,

Hello Massari,

voici un fichier en exemple, merci pour ton aide !

Bonjour,

n'étant pas très doué en formule, je me suis permis de te faire un code en VBA. Reste à voir si ça te convient ou si il te faut obligatoirement une formule

For i = 2 To Range("C65000").End(xlUp).Row
        For j = 9 To Range("A65000").End(xlUp).Row
            If Cells(j, 1).Value Like "*" & Cells(i, 3).Value & "*" Then Cells(j, 2).Value = Cells(i, 4).Value
        Next j
Next i

bonjour

par formule

cordialement

vince1512 a écrit :

Bonjour,

n'étant pas très doué en formule, je me suis permis de te faire un code en VBA. Reste à voir si ça te convient ou si il te faut obligatoirement une formule

For i = 2 To Range("C65000").End(xlUp).Row
        For j = 9 To Range("A65000").End(xlUp).Row
            If Cells(j, 1).Value Like "*" & Cells(i, 3).Value & "*" Then Cells(j, 2).Value = Cells(i, 4).Value
        Next j
Next i

C'est top mais oui j'avoue que je suis pas très doué en vba pour ma part

tulipe_4 a écrit :

bonjour

par formule

alanou35.xlsx

cordialement

C'est tout simplement parfait ! Merci beaucoup

tulipe_4 a écrit :

bonjour

par formule

alanou35.xlsx

cordialement

Par contre je trouve la formule ultra instable, je voulais l'appliquer à des centaines de lignes, et dès qu'il faut apporter une modification, elle ne me laisse rien faire.... Les formules matricielles ne sont pas destinées pour des calculs de grande ampleurs selon toi? Ou je m'y prends mal...