Copie ligne d'une autre feuille selon son nom

Bonjour,

J'ai un fichier Excel avec de nombreuses feuilles avec des tableaux de même forme contenant des données différentes.

Je souhaite créer dans une nouvelle feuille ('Feuil1' dans mon exemple) un tableau avec:

Première colonne une liste des noms de chaque feuille

Deuxième colonne une des colonne transposée de la feuille nommée dans la première colonne...

J'ai prérempli les 2 premières lignes pour exemple.

J'ai trouvé la formule pour mettre le nom de chaque feuille dans la colonne 1:

Sub sheetname()
Dim i As Integer

Range("B5").Select

For i = 1 To Sheets.Count
ActiveCell.Value = Sheets(i).Name
ActiveCell.Offset(2, 0).Select
Next i

End Sub

Mais je ne trouve pas pour extraire et transposer les colonnes provenant des feuilles correspondantes.

J'espère trouver mon salut dans ce forum, merci par avance!

Laurent.

9exemple.xlsx (15.28 Ko)

Bonjour et bienvenue,
Une proposition Power Query.
Cdlt.

8exemple.xlsx (33.06 Ko)

Bonjour

Ci joint ma solution

9exemple.xlsm (25.45 Ko)

A+ François

Super parfait merci beaucoup pour votre réactivité assez légendaire sur ce forum...

2 solutions que je vais étudier plus en profondeur, j'avoue ne jamais m'être aventuré dans Power Query et cela semble puissant...

A part si vous avez des besoins en mise en forme conditionnel je crains que je ne pourrais pas trop vous rendre la pareil tout de suite...

Bonne soirée et bonnes fêtes!

Bonjour à tous,

Une autre, a formule

15exemple.xlsm (24.26 Ko)

Merci également DjiDji, 3 méthodes pour m'en sortir, c'est top!

Voici finalement la solution optimale, le mot clé à chercher était "consolider les données de plusieurs feuilles Excel"

Rechercher des sujets similaires à "copie ligne feuille nom"