Bonjour Bertreng, le forum,
Tu as juste à modifier dans ton code cette ligne
.Cells(L + 1, 1).Value = Trim(TabTemp(L))
à remplacer par
.Cells(1, L + 1).Value = Trim(TabTemp(L))
Tu remplaces donc 'L + 1' qui correspond à un saut de ligne dans la 1ère formule en le laissant à '1' pour le mettre en saut de colonne dans la 2ème.
Bonne journée
Edition: Bonjour Jocelyn, désolé, je ne t'avais pas vu...
Message édité par: gibson94, à: 14/10/2005 10:19