Discussion :

[ZibOne]

Bonjour,

je suis bloqué sur l'exemple attaché : j'essaie de faire un tableau clean avec for each mais je n'arrive pas à aboutir au deuxième tableau..
j'ai bien vu des exemples mais.. je tourne ..en boucle.. sorry

je fais partir i de 1 à 10 dans mon exemple, j de 1 à 5 et z est mon end(xldown)-1 depuis la cellule (i,j)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
   Selection = sheets("ta_initial").range(Cells(i, j), Cells(Z, j))
 
        For Each cellule In Selection
 
        memoire = memoire & cellule
 
        Next cellule
 
    Sheets("final_tab").Cells(b + 1, j) = memoire

(avec b indicateur de ligne de ma dernière cellule non vide dans la feuille "final_tab")

je vous remercie encore pour le coup de main !

[Raccourcix]

Bonjour

Pourquoi en VBA, ça se fait en 3 étapes dans Power Query

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
let
    Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
    #"Rempli vers le bas" = Table.FillDown(Source,{"champ 1"}),
    #"Lignes groupées" = Table.Group(#"Rempli vers le bas", {"champ 1"}, {{"champ 2", each Text.Combine([champ2]), type nullable text}, {"champ 3", each Text.Combine([champ 3]), type nullable text}, {"champ 4", each Text.Combine([champ 4]), type nullable text}, {"champ 5", each Text.Combine([champ 5]), type nullable text}})
in
    #"Lignes groupées"

Stéphane

[ZibOne]

Bonsoir Stéphane,

ca me rappelle ma vieille macro de dépivotage du coup.. pas de mystère : vive la pratique !

merci beaucoup, j'ai tenté mais pas encore réussi mais je vois désormais l'idée, je te remercie beaucoup

Excellente soirée

[Raccourcix]

Bonjour

la fonction Text.Combine n'est pas proposée directement dans la fenêtre de regroupement.
Il faut choisir par exemple la somme, cela renverra un erreur (somme de texte) puis modifier directement dans la formule le List.Sum par Text.Combine

Stéphane

[ZibOne]

je suis embêté : je n'arrive pas à générer le code d'un bloc et quand je le fais mano cela ne fonctionne pas

lorsque je fais le "Group by" => cela ne génère qu'une seule fois la fonction "sum" (destinée à devenir Text.Combine)

je comprends qu'il s'agit de sélectionner l'ensemble des colonnes (dont colonne champ 1) et de les grouper par somme pour changer la fonction par la suite et ceci après avoir "filled down" la première colonne

je vais retenter mais me demande si cela ne tiendrait pas au fait que mon tableau ressemble plus précisément à cette v2 (données des colonnes supplémentaires sur la première des lignes que je voudrais regrouper sur la base du champ 1).. auquel cas sélectionner toutes les colonnes et pas seulement celles des intitulés de champ .?

au final, j'ai reconstitué la ligne de code à la main pour être en phase avec la tienne mais j'ai un message différent désormais "Expression.SyntaxError: Invalid identifier." (petit problème de nom de colonne.. alors que mes intitulés proviennent du tableau chargé sans transformation..bwef.. je poursuis)

je te tiendrai au courant, je te te remercie encore tout cas

example_tab_v2.xlsx

[Raccourcix]

Dans la fenêtre de regroupement il faut choisir "Avancé" pour pouvoir faire plusieurs regroupements
Tous ces regroupements seront entre {} dans la formule, c'est une liste de listes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Table.Group(.... , {{"nom champ", each Text.Combine([nom champ])}, {"nom champ2", each Text.Combine([nom champ2])}})

Sinon quand on commence à modifier le code à la main dans l'éditeur avancé il faut faire attention aux virgules après chaque étape sauf la dernière avant le "in"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
let
Etape1 = .... ,
Etape2 = .... ,
Etape3 = .... 
in
Etape3

Stéphane