1 colonne en plusieurs colonnes

Bonjour,
j'ai un fichier de ce type : 1 seule colonne et 1500 lignes
NOM
ADRESSE
TEL
NOM
ADRESSE
TEL
.....
Je souhaiterais regrouper tous les nom sous une même colonne, pareil pour les adresses ainsi que les tel :

NOM - ADRESSE - TEL
NOM - ADRESSE - TEL
NOM - ADRESSE - TEL
....
J'ai testé la fonction transpose mais le résultat et juste inversé en ligne

Est ce que cela est possible ? une formule, une macro ?
Est ce que quelqu'un pourrait m'aider ? y-a t'il une solution ?

Je vous remercie d'avance
EL

3 réponses

  1. Re

    Avec cette Macro tes cellules en colonnes F seront réparties sur les 3 premières colonnes :
    Il faut que ta feuille soit en première position soit la plus à gauche.

    Sub transfert()
    Nb_Lgn = Sheets(1).Cells(Rows.Count, 6).End(xlUp).Row
    X = 1
    Y = 1
    For i = 1 To Nb_Lgn
    If X = 3 Then
    Sheets(1).Cells(Y, X) = Sheets(1).Cells(i, 6)
    X = 1
    Y = Y + 1
    Else
    Sheets(1).Cells(Y, X) = Sheets(1).Cells(i, 6)
    X = X + 1
    End If
    Next i
    End Sub
    1
    1. Bonjour

      Sélectionnez la colonne à copier.
      Copiez la en faisant clic-droit puis Copier ou Ctrl + C.
      Sélectionnez la cellule ou vous souhaitez coller sous forme de ligne et faites clic-droit puis Collage Spécial.
      Dans le menu qui s'ouvre ensuite, cocher la case Transposé

      Cordialement
      0
      1. Bonjour,
        merci, j'avais essayé mais toutes mes données se retrouvent sur la même ligne
        ce que j'aimerais c'est que les données soient chacune dans la colonne sans avoir besoin de sélectionner chaque groupe de lignes...



        Merci
        Cordialement
        0
    2. Bonjour
      Un exemple , suis bien ce qui t'es dit plus haut
      https://www.cjoint.com/c/HIkoEsJrd67
      0