Transpositions de lignes en colonnes par groupes de 4

Résolu/Fermé
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018 - 28 nov. 2015 à 17:30
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018 - 29 nov. 2015 à 11:36
Bonjour,
Je ne suis pas un foudre de guerre en excel et bute sur un problème.
J'ai un long tableau (milliers de références) constitué de données ordonnées sur des lignes comme suit, quatre lignes à chaque fois:

A1 Jean
A2 Route de Paris
A3 1000 St truc
A4 Belgique
A5 Paul
A6 Route de Bruxelles
A7 2000 Strof les bains
A8 France
Etc
Pour une raison x j'ai le besoin de présenter les valeurs sur un nouveau TAB sous forme de tableau dans des colonnes comme ceci
A1 Noms B1 Rue C1 Ville D1 Pays
A2 Jean B2 Route de Paris C2 1000 St Truc D2 Belgique
A3 Paul B3 Route de Bruxelles C3 2000 Strof les bains D3 France

Comme il y a des milliers de références je ne peux pas simplement transposer en copier/coller chaque groupe de quatre lignes manuellement.
Une macro devrait pouvoir gérer une boucle pour la copie transposée mais je ne connais pas cette programmation. Quelqu'un a-t-il déjà rencontré ce cas?

Merci d'avance.

A voir également:

4 réponses

Vaucluse Messages postés 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 395
28 nov. 2015 à 18:28
Bonsoir

voyez cette option par formule
https://www.cjoint.com/c/EKCrzQUKNz5

la formule est ajustée pour:
__une liste de données qui débute en A1
__un tableau de résultats qui débute en C1valeur

ensuite faire un copier/collage spécial valeur pour supprimer les formules

crdlmnt
0
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018
29 nov. 2015 à 11:16
Bonjour, merci pour la proposition
Je vais étudier la structure de cette fonction qui devrait faire l'affaire moyennant ajustements. Ma définition ne devait pas être idéale car votre exemple ne répond pas au besoin.
Par rapport à votre tableau, je souhaitais tous les noms dans la même colonne, toutes les rues dans la même colonne, tous les pays dans la même colonne... soit A5 en C2, A9 en C3 etc.
0
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018
29 nov. 2015 à 11:36
Bonjour Vaucluse,
La macro de Maurice est fonctionnelle et répond à mon besoin. Donc c'est résolu, mais je suis certain que votre formule devait être utilisable également.
Bon dimanche. Luca
0
Bonjour
Voila un exemple en vba
Sub Macro1()
Nlig = Range("A" & Rows.Count).End(xlUp).Row
I = 1
   For L = 1 To Nlig Step 4
      Range("A" & L & ":A" & L + 3).Copy
      Feuil3.Range("A" & I).PasteSpecial xlPasteValues, , , True
      I = I + 1
   Next
Application.CutCopyMode = False
End Sub

A+
Maurice
0
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018
29 nov. 2015 à 11:33
Hello Maurice,
C'est exactement çà. Vous me tirez une belle épine du pied. Maintenant à moi de comprendre l'utilisation de ce & et des , , , histoire de pas mourir idiot :-)
Merci à tous et bon dimanche
0
yclik Messages postés 3593 Date d'inscription vendredi 25 juillet 2014 Statut Membre Dernière intervention 24 avril 2024 1 481
28 nov. 2015 à 18:43
bonsoir
une piste à tester

ici

Voir la fonction INDIRECT sur Excel (car réalisé avec OpenOffice)
0
lucabxl Messages postés 9 Date d'inscription mardi 25 mars 2014 Statut Membre Dernière intervention 5 septembre 2018
29 nov. 2015 à 11:04
Merci à tous pour vos propositions, de bonnes pistes et nouveautés pour moi. Je fais le test et vous confirmerai.
Bon dimanche
0