Discussion :

[tam938]

Bonjour,

Je cherche une macro qui me permettra de concaténer les lignes d'une colonnes.
J'ai essayé avec la formule =Concatener et = B2&B3 ... et j'obtiens ce que je veux.
Or, j'ai beaucoup de données à traiter et je souhaite le faire avec une Macro VBA EXCEL.

Je vous explique ce que je veux:
Dans le fichier en pj, je veux concaténer les cellules de la colonne B. Mais pas toutes dans la même cellule.
En effet, je veux le faire en fonction de la donnée de la colonne "A".
Dans le fichier en pj, j'ai mis dans la colonne "C" le résultat que je souhaite obtenir.

Merci d'avance pour votre aide.
J'aimerai bien que vous m'expliquiez votre code ---> Pour ma culture VBA

Tam938

[Philippe Tulliez]

Bonjour,

Je cherche une macro qui me permettra de concaténer les lignes d'une colonnes.
J'ai essayé avec la formule =Concatener et = A1&B1 ... et j'obtiens ce que je veux.

Il y a une contradiction dans cette demande si tu concatènes A1 & B1 ce sont les colonnes d'une ligne et pas l'inverse.

[tam938]

Merci Philippe, je viens de corriger.

[Thautheme]

Bonsoir le fil, bonsoir le forum,

Pourrais-tu, avec une capture d'écran ou en tapant le texte, nous expliquer qu'elle est la condition en colonne A qui fait que tu concatènes ou pas ?

[tam938]

Bonjour,

Dans la colonne "A", j'y ai mis des codes. Chaque code a des adresses (colonne "B") positionnées l'une après l'autre.
Par exemple, dans le fichier, le code "938" a 2 adresses : toto@toto.com,tata@tata.com,
le code "951" a 3 adresses: tonton@tonton.comtoto@toto.com,tata@tata.com,

Donc je veux que les adresses de la colonne "B" soient concaténées par adresse.

Cordialement,

POUBADY Ratna

[Thautheme]

Bonsoir le fil, bonsoir le forum,

Pas encore tout a fait clair... Est-ce que dans la colonne A tu répètes le code :

A     B
125    Adresse1
125    Adresse2  
358    Adresse1
358    Adresse2

ou tu as des blancs :

A     B
125    Adresse1
       Adresse2
358    Adresse1
       Adresse2

et est-ce que le résultat désiré serait :

A     B
125    Adresse1,Adresse2
358    Adresse1,Adresse2