Transformer un tableau

[Karibou]

J'ai recupere des donnees en copier/coller sous forme d'un tableau en ligne

nom dupont
prenom jean
adresse 10 rue..
cp 55
ville .....

et j'aimerais le transformer en eu tableau en colones.


Nom Prenom Adres CP Ville


Merci d'avance a tous

 

[Valérie]

BONJOUR Karibou, et le forum bien entendu,

Il te suffit de copier, puis demander un collage spécial et cocher la case transposé, et de passer un bon WE de paques.

@ très bientôt
Valérie

 

[Guigui]

Hello,

le collage special ne marche que si il n'y a qu'un seul enregistrement. Si il s'agit d'une liste, il faut faire une petite macro.

@+

 

[Zon]

Bonjour à tous les trois et au forum,

Admettons que le 1er nom est en cellule A2 et on veut les copier en ligne à partir de B2, le code suivant


Sub essai2()
Dim i, j As Integer
j = 2
For i = 2 To Range("A65536").End(xlUp).Row Step 5
Range("A" & i, "A" & i + 4).Copy
Range("B" & j).PasteSpecial Transpose:=True
j = j + 1
Next i
End Sub

A+++

 

[Karibou]

Merci a tous

J'ai effectue le copier /coller avec la case transposé et cela a fonctionne

A+