colonne en ligne

J

Jerome

Guest
bonjour j'ai un fichier excel comme ceci

nom truc
prenom machin
age 19

nom truc2
prenom machin2
age 45


j'aimerai avoir


truc machin 19
truc2 machin2 45

aidez moi svp
 

dg62

XLDnaute Barbatruc
Bonjour Jerome,



Pour répondre à ton problème, il faudrait que tu donnes la structure exacte de ton fichier.

le libellé 'Nom' et le nom sont dans 2 colonnes différentes ?
idem pour prénom et age
il y toujours une ligne de séparation entre chaque groupe ?


Quel est ton niveau en VBA ?
 
J

Jerome

Guest
nom jeroome
prenom mathieu
age 19

nom michel
prenom adfs
age 45




et j'aimerais le transposer comme ca
nom prenom age
jerome mathie 19
michel adfs 45


[file name=Classeur1_20051011111102.zip size=1545]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051011111102.zip[/file] [file name=Classeur1_20051011111102.zip size=1545]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051011111102.zip[/file]
 

Pièces jointes

  • Classeur1_20051011111102.zip
    1.5 KB · Affichages: 16
D

dg62

Guest
Re
une solution en VBA
le code est a coller dans un module.

Code:
Sub transpose()
dim i as integer, dim j as integer
dim nom as string
dim prénom as string
dim age as string
J = 1
Range('E1').Value = 'nom'
Range('F1').Value = 'prénom'
Range('G1').Value = 'age'



For i = 1 To 1000 Step 4  ' à déterminer
nom = Range('B' & i).Value
prénom = Range('B' & (i + 1)).Value
age = Range('B' & (i + 2)).Value

Range('E1').Offset(J, 0).Value = nom
Range('F1').Offset(J, 0).Value = prénom
Range('G1').Offset(J, 0).Value = age
J = J + 1
Next i
End Sub

Message édité par: dg62, à: 11/10/2005 13:20
 

Discussions similaires

Réponses
7
Affichages
373

Membres actuellement en ligne

Statistiques des forums

Discussions
312 677
Messages
2 090 824
Membres
104 677
dernier inscrit
soufiane12