Passer d'une colonne à un ligne séparée par des virgules
Bonjour,
Question simple
J'ai des informations positionnées en forme de colonne.
exemple:
Jambon
Tartiflette
Saucisson
Fromage
Tarte
Boissons
etc...
et je voudrais l'afficher comme suit en automatique:
Jambon,Tartiflette,Saucisson,Fromage,Tarte,Boissons,etc....
Auriez vous une solutions ?
Merci
Cordialement
Bylbo7
Bonjour,
Tu n'es pas nouveau sur le forum, alors
voici un exemple de fichier.
Re,
une petite fonction personnalisée
Cdlt
Option Explicit
Function concatene(champ As Range)
'http://boisgontierjacques.free.fr/pages_site/tableaux.htm
concatene = Join(Application.Transpose(champ), ",")
End Functionc'est bien ça, mais je n'arrive pas à le faire.
Pourrais tu être plus explicite, je ne suis pas très doué ....
Merci
Re,
C'est une fonction personnalisée en VBA. Elle fonctionne comme une fonction de feuille de calcul.
Comme = somme(A1:A10), par exemple.
Que n'arrives tu pas à reproduire dans ton fichier? Tu as un exemple. Il suffit de le reproduire
A te relire.
Cdlt
ok je comprend en faite cela marche que dans ton exemple.
Quand j'ouvre un nouveau classeur je n'arrive pas à le faire
Re,
Il faut que tu exportes la fonction ou que tu copies son code ton nouveau classeur.
Le + simple:
Avec tes 2 classeurs ouverts.
tu fais ALT F11 pour ouvrir l"éditeur VBA.
Dans le classeur que je 'ai envoyé, il y a un module1. Tu le copies dans ton nouveau classeur et c'est terminé
Cdlt
Merci beaucoup