Transposer les données

je voudrais savoir comment transposer les données d'une colonnes à une autres en utilisant un code vba ou formule
j'un classeur de 29000 lignes

Que voulez vous faire exactement ?

Tous les items ont ils 3 lignes sans exception ?

Et ensuite : Allez vous supprimer les lignes 2 et 3 ?

A+

Bonjour à tous !

Votre produit est toujours Excel 2007 ?

A partir d'Excel 2010 et +, Power Query en 4 clics vous apporte une piste sérieuse.

oui effectivement tous items on 3 lignes par contre pour la suppression je supprimerais la deuxième et la troisième ligne uniquement et merci

bonsoir,

Voici une solution :

Sub Galopin()
Dim i&, Arr, rng As Range
Application.ScreenUpdating = False
Set rng = Range("A1").CurrentRegion
With rng
    Arr = .Offset(1).Resize(.Rows.Count - 1).Value
End With
For i = UBound(Arr) - 2 To 1 Step -3
    Arr(i, 3) = Arr(i + 1, 2)
    Arr(i, 4) = Arr(i + 2, 2)
Next
rng.Offset(1).Resize(rng.Rows.Count - 1) = Arr
For i = UBound(Arr) + 1 To 4 Step -3
    Rows(i).Delete
    Rows(i - 1).Delete
Next
End Sub

A+