Discussion :

[Tapo51]

Bonjour à tous !

J'ai un tableau contenant des codes alphanumériques.
Je recherche chacun de ces codes alphanumériques dans un autre tableau afin qu'il me donne plusieurs données correspondantes d'une même colonne. J'aimerais ces résultats soient concaténés dans une même cellule. Ces résultats sont aussi alphanumumériques.

Le tableau ci-joint vous démontre mon problème.

Malheureusement "recherchev" me donne seulement que le premier résultat trouvé.

Quelqu'un peut-il m'aider là dessus ?

Merci

[annickl]

Quelques pistes : La fonction rechv ne pourra jamais t'amener plus d'une valeur en réponse, alors que "décaler" peut le permettre. Par ailleurs, tu as besoin de "concaténer" pour concaténer de l'alphanumérique.

J'ai fait quelques tests sur des combinaisons de concatener/décaler/equiv, mais cela n'est pas très pas très concluant. Je me demande s'il ne vaudrait pas mieux passer par des etiquettes de ta colonne?

[cafeine]

Hello,

une piste de solution

met VRAI pour blnConcat si tu veux concaténer ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Function ConcatVLookUp(ByVal ValRecherche, _
                       ByVal TabMatrice As Range, _
                       ByVal IndexCol, _
              Optional ByVal blnConcat As Boolean = False, _
              Optional ByVal Separateur = ";") As Variant
 
' Permet une recherchev sur des caractères génériques
'
Dim c As Range
 
application.Volatile
 
For Each c In TabMatrice.Cells
    If c.Value Like ValRecherche Then
        ConcatVLookUp = ConcatVLookUp & Separateur & c.Offset(0, IndexCol - 1).Value
        If Not blnConcat Then Exit For
    End If
Next c
ConcatVLookUp = Mid(ConcatVLookUp, Len(Separateur) + 1)
 
Set c = Nothing
End Function

[cafeine]

ah oui, avantage de cette fonction tu peux utiliser des caractères génériques ... ce que ne permet pas RECHERCHEV

ex :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=concatvlookup("DUPON*";A2:A8;2;VRAI;" - ")

pour concaténer DUPONT et DUPOND par exemple ...

[Tapo51]

Petite clarification à propos de mon problème:

Le tableau à partir duquel je fais la recherche comporte des codes alphanumériques uniques.
L'information (également alphanumérique) correspondante que je recherche en colonne 2 de ma table matrice peut se retrouver plusieurs fois pour ce même code. Ce sont ces différents résultats de ma recherche que je voudrais concaténer.

tout comme dans l'exemple du fichier xls ci-joint....RechercheV.xls

quelqu'un aurait-il un idée de la formule ou de la fonction ?

[random]

ma solution

[cafeine]

Hello,

je viens de tester ma fonction ... ça marche parfaitement ... ce serait sympa que tu fasses le test quand quelqu'un prend la peine de te fournir une solution ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=concatvlookup(A2;achat;2;VRAI;";")

Petite clarification à propos de mon problème:

Le tableau à partir duquel je fais la recherche comporte des codes alphanumériques uniques.
L'information (également alphanumérique) correspondante que je recherche en colonne 2 de ma table matrice peut se retrouver plusieurs fois pour ce même code. Ce sont ces différents résultats de ma recherche que je voudrais concaténer.

tout comme dans l'exemple du fichier xls ci-joint....RechercheV.xls

quelqu'un aurait-il un idée de la formule ou de la fonction ?

[Tapo51]

Allo Cafeine

la fonction que tu me donnes (concatvlookup) ne fonctionne pas. J'utilise la version française de excel.
Peut-être qu'il y a qqc que je ne comprends pas....J'ai essayé concatenerrecherchev..... mais cela ne fonctionne pas plus. Peux-tu m'expliquer davantage ? ou me montrer ta suggestion sur le fichier que j'avais joint.

Merci beaucoup pour tes suggestions !

Hello,

je viens de tester ma fonction ... ça marche parfaitement ... ce serait sympa que tu fasses le test quand quelqu'un prend la peine de te fournir une solution ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=concatvlookup(A2;achat;2;VRAI;";")

[cafeine]

Il faut quand meme ajouter cette fonction dans un module de code ...

Allo Cafeine

la fonction que tu me donnes (concatvlookup) ne fonctionne pas. J'utilise la version française de excel.
Peut-être qu'il y a qqc que je ne comprends pas....J'ai essayé concatenerrecherchev..... mais cela ne fonctionne pas plus. Peux-tu m'expliquer davantage ? ou me montrer ta suggestion sur le fichier que j'avais joint.

Merci beaucoup pour tes suggestions !

[Tapo51]

Dac Cafeine !

J'aurais dû comprendre qu'il s'agissait d'une ligne de code. Bien que j'en soit à mes débuts pour le code....je vais essayer

merci beaucoup !

[alicemv]

Bonjour à tous,
Merci caféine pour le code. Il me semble que c'est tout à fait ce que je cherche, sauf que je n'arrive pas à le faire marcher avec d'autres données. J'ai modifié le contenu des colonnes et le pointage vers les bonnes colonnes dans la formule dans ton fichier et je n'ai plus que la première ligne qui fonctionne...
Il me faut trouver les références de la colonne REF (A - Recherche produit) dans la colonne LBASE (A - Achat) et renvoyer les immatriculations ((D - Achat) séparés par des ";"
Je ne sais pas programmer et j'ai du faire quelque chose qu'il ne fallait pas...

Merci d'avance