[Transformer un tableau de données en une seule ligne]
Bonjour,
Je cherche une technique (formule, ou bien, une macro) pour transformer un tableau de données en une seule colonne.
Je souhaite transposer la première ligne du tableau en une colonne puis transposer la seconde ligne également à la suite de la colonne précédemment réalisée à partir de la première ligne de mon tableau puis transposer la troisième ligne à la suite de la dite-colonne créée et ainsi de suite.
Le nombre de colonne (28) de mon tableau est toujours le même.
Mais, le nombre de ligne de mon tableau variera.
Toutefois si je comprends la technique, je devrai réussir à adapter le nombre de ligne.
Merci d'avance
Bonjour
Un essai à tester. Te convient-il ?
Bye !
Bonjour,
une manière
Option Explicit
Sub Transposer()
Dim Li, Col As Integer
Dim i
Dim sh1, sh2 As Worksheet
Set sh1 = Sheets("Feuil1"): Set sh2 = Sheets("feuil2")
For Li = 1 To sh1.[A65000].End(xlUp).Row
For Col = 1 To 28 ' ou 30 si 30 colonnes comme dans ce fichier exemple
sh2.Cells(i + 1, 1) = sh1.Cells(Li, Col).Value
i = i + 1
Next Col
Next
End Suboups.. pas rafraichi
Bonjour,
Ton tableau a 30 colonnes et 16 lignes. Transposé, il comportera 16 colonnes et 30 lignes.
Tu peux le transposer d'un seul coup, par copie et collage spécial Transposé. (voir Feuil2)
En collant tout tu transposes aussi les formats.
Tu peux aussi le faire par formule :
tu sélectionnes la plage A1:P30 sur une feuille,
tu tapes la formule :
=TRANSPOSE(Feuil1!A1:AD16)et tu valides par Ctrl+Maj+Entrée (la formule est évidemment matricielle)
et ton tableau sera transposé en bloc. (voir Feuil 3)
Cordialement.
Bonjour,
Je vous remercie tous les trois pour le temps que vous m'avez accordé.
Je vous prie de m'excuser pour mon erreur de calcul du nombre de colonnes... C'est bien 30.
MFerrand, je ne cherchais pas une simple transposition. Je m'excuse si je n'étais pas suffisamment clair.
En tout cas, les solutions données par patrick1957 et particulièrement par gmb m'ont satisfait.
Merci beaucoup !