Bonjour Valentin,
Merci pour cette réponse en ce Lundi matin ensoleillé.
Voici le message d'erreur:
L'erreur survient donc dès la première ligne de ton code. D'ailleurs, si j'inverse Type extract et Limit dans la ligne de code, le msg change et indique qu'il ne trouve pas la colonne "Type Extract" .
Si je clique sur l'étape "Colonnes renommées" Tout à l'air de fonctionner sur cette étape qui renvoi le même tableau que tu as utilisé en source dans Excel.
Voici le code:
let
Source = Folder.Files("S:\METRO\Gabin\VBA ; Classeurs Excel ; Moulinettes\Visuel Indicateur suivi de projet\DATAS"),
#"Fichiers masqués filtrés1" = Table.SelectRows(Source, each [Attributes]?[Hidden]? <> true),
#"Appeler une fonction personnalisée1" = Table.AddColumn(#"Fichiers masqués filtrés1", "Transformer le fichier (2)", each #"Transformer le fichier (2)"([Content])),
#"Colonnes renommées1" = Table.RenameColumns(#"Appeler une fonction personnalisée1", {"Name", "Source.Name"}),
#"Autres colonnes supprimées1" = Table.SelectColumns(#"Colonnes renommées1", {"Source.Name", "Transformer le fichier (2)"}),
#"Colonne de tables développée1" = Table.ExpandTableColumn(#"Autres colonnes supprimées1", "Transformer le fichier (2)", Table.ColumnNames(#"Transformer le fichier (2)"(#"Exemple de fichier (2)"))),
#"Type modifié" = Table.TransformColumnTypes(#"Colonne de tables développée1",{{"Source.Name", type text}, {"Colonne1", type text}, {"Colonne2", type text}, {"Runs →", type number}, {"FOT", type any}}),
#"Fractionner la colonne par position" = Table.SplitColumn(#"Type modifié", "Source.Name", Splitter.SplitTextByPositions({0, 5}, true), {"Source.Name.1", "Source.Name.2"}),
#"Type modifié1" = Table.TransformColumnTypes(#"Fractionner la colonne par position",{{"Source.Name.1", type text}, {"Source.Name.2", type text}}),
#"Colonnes supprimées" = Table.RemoveColumns(#"Type modifié1",{"Source.Name.2", "Colonne2"}),
#"Colonnes renommées" = Table.RenameColumns(#"Colonnes supprimées",{{"Runs →", "Limit"}, {"Source.Name.1", "Pièce"}, {"Colonne1", "Type extract"}}),
#"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(Source, {"Limit", "Type extract", "Pièce"}, "Attribut", "Valeur"),
#"Lignes groupées" = Table.Group(#"Supprimer le tableau croisé dynamique des autres colonnes", {"Pièce", "Type extract", "Limit"}, {{"Tabl", each _, type table [Pièce=text, Type extract=text, Limit=number, Attribut=text, Valeur=number]}}),
#"Personnalisée ajoutée" = Table.AddColumn(#"Lignes groupées", "Personnalisé", each Table.AddIndexColumn([Tabl],"Index",1)),
#"Personnalisé développé" = Table.ExpandTableColumn(#"Personnalisée ajoutée", "Personnalisé", {"Attribut", "Valeur", "Index"}, {"Attribut", "Valeur", "Index"}),
#"Colonnes supprimées1" = Table.RemoveColumns(#"Personnalisé développé",{"Tabl"}),
#"Type modifié2" = Table.TransformColumnTypes(#"Colonnes supprimées1",{{"Valeur", type number}, {"Limit", type number}}),
#"Colonnes permutées" = Table.ReorderColumns(#"Type modifié2",{"Pièce", "Type extract", "Limit", "Index", "Attribut", "Valeur"}),
#"Colonne fusionnée insérée" = Table.AddColumn(#"Colonnes permutées", "Fusionné", each Text.Combine({Text.From([Index], "fr-FR"), [Attribut]}, "-"), type text),
#"Colonnes supprimées2" = Table.RemoveColumns(#"Colonne fusionnée insérée",{"Index", "Attribut"})
in
#"Colonnes supprimées2"
L'erreur semble donc venir de la ligne
#"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(Source, {"Limit", "Type extract", "Pièce"}, "Attribut", "Valeur")
Gabin