Bonsoir
par une macro à lancer sur la feuille excel qui contient tes données :
Sub une_col()
nbcol = 180
nblignes = 25000
nblignesparfeuille = 50000 'c'est un choix
nbfeuilles = Int(nbcol * nblignes / nblignesparfeuille) + 1
Set Source = ActiveWorkbook
Set Destination = Workbooks.Add
While Destination.Sheets.Count < nbfeuilles
Destination.Sheets.Add
Wend
l = 1 'n° de la ligne
f = 1 'n° de l'onglet
For i = 1 To nblignes
For j = 1 To nbcol
Destination.Sheets(f).Cells(l, 1).Value = Source.Sheets(1).Cells(i, j).Value
l = l + 1
If l > nblignesparfeuille Then
l = 1
f = f + 1
End If
Next
Next
End Sub
en l'occurence cette macro prend les données de la feuille 1 du classeur
source et les met en colonne dans les feuilles 1 à
nbfeuilles du classeur
destination. Ce dernier est créé par la macro mais pas enregistré.
bon courage