colonne en ligne

dg62

XLDnaute Barbatruc

• 11 Octobre 2005

• #2

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 ?

 

Vote positif 0 Vote négatif

J

Jerome

Guest

• 11 Octobre 2005

• #3

voila le fichier

 

Vote positif 0 Vote négatif

J

Jerome

Guest

• 11 Octobre 2005

• #4

 

Vote positif 0 Vote négatif

J

Jerome

Guest

• 11 Octobre 2005

• #5

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

Vote positif 0 Vote négatif

D

dg62

Guest

• 11 Octobre 2005

• #6

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

 

Vote positif 0 Vote négatif

A

andré

XLDnaute Barbatruc

• 11 Octobre 2005

• #7

Salkut à vous,

En complément à la solution de dg62, voici une solution avec une seule formule.

Â+

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

 

Vote positif 0 Vote négatif

J

Jerome

Guest

• 11 Octobre 2005

• #8

Merci beaucoup. Je vous souhaite une bonne journée

 

Vote positif 0 Vote négatif