Bonsoir,
voici une macro qui met tes données en colonnes comme souhaité:
tu dois sans doute adapter
"sheet1" feuille dans laquelle se trouvent les données brutes
"sheet2" feuille dans laquelle doit se trouver le résultat
i= ligne de sheet1 à laquelle il faut commencer le reformattage (dans ce cas ci j'ai mis 20, car dans ton fichier c'était la première ligne avec des données exploitables
l= première ligne avant laquelle tu souhaites voir les résultats sur sheet2
Sub reformat()
s1="sheet1"
s2="sheet2"
i = 20
l = 1
While Worksheets(s1).Cells(i, 1) <> ""
l = l + 1: c = 1
While Worksheets(s1).Cells(i, 1) <> ""
Worksheets(s2).Cells(l, c) = Worksheets(s1).Cells(i, 1)
c = c + 1
i = i + 1
Wend
i = i + 1
Wend
End Sub