Classer des données en colonnes

Bonjour Le forum

Existe-t-il un moyen de classer des données contenues dans une seule colonne en plusieurs colonnes

Je joint un fichier pour exemple

Je vous remercie pour vos réponses

Cordialement

Le fichier n'a pas charger le voici

17fournisseurs.zip (574.46 Ko)
8fournisseurs.zip (574.46 Ko)

Bonjour à tous !

Une proposition via Power Query ?

Un tableau structuré (Tableau1) a été inséré (colonne A de la feuille).

Code de la requête :

let
    Source = Table.Buffer(Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content]),
    ListSplit = List.Split(Source[Colonne1],7),
    TblFromRow = Table.FromRows(ListSplit)
in
    TblFromRow

Bonsoir à tous,

A tout hasard je vous propose aussi une solution en VBA comme ça vous aurez le choix, mais Power Query est idéal.

Sub Rangement()
    Dim DerLig As Long, Lig_Dest As Long, Nb_Lig As Long, i As Long
    Application.ScreenUpdating = False
    DerLig = Range("A1").CurrentRegion.Rows.Count
    Nb_Lig = Int(DerLig / 7)
    Lig_Dest = 1
    For i = 1 To DerLig Step 7
        Range(Cells(Lig_Dest, "B"), Cells(Lig_Dest, "H")).Value = Application.Transpose(Range(Cells(i, "A"), Cells(i + 6, "A")))
        Lig_Dest = Lig_Dest + 1
    Next i
End Sub

Cdlt

Bonjour à tous,

Au cas où si eole-33 voudrait passer à office 365 ou pour d'autres passant par ici...

=ORGA.LIGNES(A1:A43387;7)

Bonjour le forum

JB_, Arturo83, JFL,

Merci pour votre aide, je ne connais pas Power Query, le code VBA fonctionne nickel et la formule office 365 aussi (juste il faut absolument que les cellules en colonnes B et suivantes soient vides car dans la cellules ou la formule a été collée le message "Propagation" apparait)

Sujet clos

Bonjour à tous !

......et la formule office 365 aussi.....

Si la formule Microsoft 365 est opérationnelle, il serait opportun de modifier votre profil pour porter à la connaissance des contributeurs cette information importante....

Rechercher des sujets similaires à "classer donnees colonnes"