Transcrire une colonne en une ligne

Bonjour,

Tout est dit dans le tableur joint.

Le but recherché est d'avoir les cellules d'une colonne sur une ligne avec UN POINT VIRGULE comme séparateur.

Cordialement

Tonthon

10adresses-mail.xls (17.50 Ko)

Bonjour

Avec une fonction personnalisée (à mettre dans un module)

Function concat(champ)
   temp = ""
   For Each d In champ
     If Len(d.Value) > 0 Then temp = temp & d.Value & ";"
   Next d
   concat = temp
End Function

La formule :

=concat(A4:A23)

Amicalement

Nad

Salut Nad,

Tu pourrais mettre la fonction dans mon tableur...

Enfin, je débute en VBA et je ne maitrise pas encore à fond

Merci d'avance,

Tonthon

Re

Voilà :

Active les macros à l'ouverture du fichier.

Amicalement

Nad

Bonjour Nad et tout le forum,

Merci pour le renvoi du tableur, j'ai compris qu'il fallait mettre cela dans un module.....

J'ai voulu présenter ma demande d'une manière simplifiée en pensant que la solution fonctionnerait sur mon tableur réel.

Cette solution affiche en permanence toutes les adresses même si après un filtrage dans la colonne sélectionnée, il apparait que 5 adresses par exemple.

Je joins le tableur actualisé qui expose le souci.

Cordialement

Tonthon

Bonjour à tous,

Je clos ce post qui répondait à ma préoccupation initiale pour mieux exposer le "nouveau défi" sur un nouveau post.

Cordialement

Tonthon

Rechercher des sujets similaires à "transcrire colonne ligne"