re

[Riric]

Ben un fichier n'aiderai pas beaucoup à la compréhension étant donné que c'est juste une liste d'adresses mails (une par case) dans la colonne B.. (j'ai pas winzip, jsuis au taf :/ )

en fait, ce que je veu faire pourrai etre fait avec la fonction 'CONCATENER (texte1; texte2;...)' mais le probleme, c'est qu'il faudrait automatiser la tache comme il y a bcp d'adresses (~500)...

En tout cas, merci de t'intéresser à mon probleme...

 

[Riric]

mince dsl pour cette gourde, je me suis planté de bouton, je voulais faire répondre à mon sujet....
dsl

 

[fifou_istb]

re

voila je t'ai fait un petit code VBA qui te fait ça:

Sub concatener()
Dim a, b

For i = 1 To Range('b1').End(xlDown).Row
    a = Range('b' & i).Value
    b = a & ';' & b
Next
Range('d1').Value = b
End Sub

voila voila

 

[Riric]

merci merci, vrément bien ce forum...