Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Tableau Power Query

  • Initiateur de la discussion Initiateur de la discussion JHA
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JHA

XLDnaute Barbatruc
Bonjour à tous,

Avez-vous la solution pour réaliser le tableau de droite sous Power Query, malgré mes essais je ne trouve pas la bonne solution.
Il faut que les séries se suivent par site.

Edit: changement fichier

JHA
 

Pièces jointes

Dernière édition:
Bonjour @JHA,
Ne maitrisant très très très très peu PowerQuery, je me suis mis sur le sujet afin de comprendre si quelqu'un venait à répondre.
En l'absence actuelle de réponse, voici ma proposition en VBA.
Un peu tirée par les cheveux mais les deux tableaux finaux sont identiques.
@+ Lolote83
 

Pièces jointes

Bonjour à tous et @Lolote83 🙂

Je te remercie pour ton investissement sur ce sujet. Cette solution donne en effet le bon résultat.

Je reste à l'écoute pour une proposition Power Query qui me permettra d'avancer avec cet outil.

JHA
 
Bonjour JHA, JFL_Excel, Lolote83, le forum,

j'arrive trop tard ... ma proposition tout de même.


PowerQuery:
let
Source = Excel.CurrentWorkbook(){[Name="Base"]}[Content],
    ColName = Table.ColumnNames(Source),
    #"Grouped Rows" = Table.Group(Source, {"SITE"}, {{"AllData", each Table.AddIndexColumn(_,"Index",0)}}),
    #"Added Custom" = Table.Combine(Table.AddColumn(#"Grouped Rows", "Custom", each let
alldata = [AllData],
Next =  Table.AddColumn(alldata, "Next", each try Table.Column(alldata, ColName{5}){[Index] + 1} otherwise Table.Column(alldata, ColName{5}){[Index]}),
Result = Table.AddColumn(Next, "List", each {Table.Column(Next, ColName{5}){[Index]}..Table.Column(Next, "Next"){[Index]}-1} )
in Result)[Custom]),
    Result = let fct = (fnRec as record) as list => List.Transform({ColName{5}}, each {_, each if List.Count(fnRec[List]) > 0 then fnRec[List] else {_} }) in Table.ExpandListColumn(Table.SelectColumns(Table.FromRecords(Table.TransformRows(#"Added Custom", (Rec) => Record.TransformFields(Rec, fct(Rec)))), ColName), ColName{5})
in
    Result

Bonne fin de journée
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Power Query
Réponses
7
Affichages
152
  • Question Question
Microsoft 365 Power Query
Réponses
2
Affichages
67
Réponses
1
Affichages
41
Réponses
5
Affichages
464
  • Question Question
Microsoft 365 Power Query
Réponses
8
Affichages
112
Réponses
2
Affichages
448
Réponses
8
Affichages
391
  • Question Question
Power Query Power Query
Réponses
26
Affichages
377
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…