Petit problème de concatenation

[Scoty]

Bonjour a tous,

Je me confronte un petit soucis lors d'une extraction de données d'une base pour concatener des infos... Je pense que c'est pas très compliqué mais je sèche !!

Soit une liste avec 2 colonnes:
- lot
- commande

Une commande peut être dans plusieurs lots. Je cherche une astuce pour me créer une colonne ou je concatène l'info des lots pour chaque ligne des commandes, pour me permettre par la suite de faire un tableau croisé.

Ci-joint un exemple avec ce que je souhaite.

Merci d'avance!

a+ Scoty

 

[job75]

Re : Petit problème de concatenation

Bonsoir Scoty,

Voyez le fichier joint et cette fonction :

Function CONCAT(V1 As Range, V2 As Range, cel As Range, sep$)
'V1 et V2 sont des vecteurs de même dimension
Dim d As Object, i&
Set d = CreateObject("Scripting.Dictionary")
For i = 1 To V1.Count
  If V2(i) = cel And Not d.exists(V1(i).Value) Then d(V1(i).Value) = ""
Next
CONCAT = Join(d.keys, sep)
End Function

Bonne fin de soirée.

 

[CISCO]

Re : Petit problème de concatenation

Bonsoir à tous, bonsoir job75.

On peut aussi faire en ligne 6 avec

=D6&"-"&SIERREUR(INDEX(D$1:D$12;MIN(SI((E$6:E$12=E6)*(D$6:D$12<>D6);LIGNE(E$6:E$12);1000)));"")

en matriciel, donc à valider avec Ctrl+maj tempo+entrer.

Cela ne donne pas exactement ce que tu veux, dans le bon ordre, mais cela n'est pas très loin.

@plus

 

[job75]

Re : Petit problème de concatenation

Bonsoir CISCO,

Ta formule ne fonctionne pas s'il y a plus de 2 items à concaténer.

Bonne nuit.

 

[Scoty]

(RESOLU) Petit problème de concatenation

Bonsoir Job,

Merci beaucoup!! J'espère que vous allez bien depuis le temps!

Bonsoir Cisco,

Votre formule est très intéressante d'ailleurs je crois que je peux utiliser l'idée pour un autre pépin que j'avais presque résolu.. un grand merci!

Bonne soirée

a+ Scoty

 

[CISCO]

Re : Petit problème de concatenation

Bonjour à tous, bonjour Job75

Bonsoir CISCO,

Ta formule ne fonctionne pas s'il y a plus de 2 items à concaténer.

Bonne nuit.

Et voui, j'y ai pensé après l'avoir postée...

La nuit portant conseil, Cf. une autre possibilité en pièce jointe, fonctionnant même lorsqu'il y a plus de 2 lots à concatener, mais n'affichant qu'une fois la bonne réponse en face de la commande, dans le haut de la liste, lorsque cette commande apparait pour la première fois (La formule matricielle fonctionne en concatenant le contenu des cellules à partir du bas. Les résultats dans le bas de la colonne étant incomplets, j'ai mis une MFC cachant ces résultats partiels).

@ plus

P.S : Il faut bien sûr adapter le 13 et les 12 (et même peut être les 1000) à ton fichier réel.