Bonsoir,
J'essaie de rapatrier les fichiers d'un dossier à l'aide de power query. Mais j’obtiens un message d'erreur.
Comment fusionner plusieurs fichiers d'un même dossier
https://www.youtube.com/watch?v=zvbdmuGczuc
FxMaFontion
let
MaFonction = (FolderPath, SheetName)=>
let
Source = Excel.Workbook(File.Contents(FolderPath), null , true),
Feuil1_Sheet = Source{[Item=SheetName,Kind="Sheet"]}[Data],
SupprLig = Table.Skip(Feuil1_Sheet,8),
PromoteHeader = Table.PromoteHeaders(SupprLig, [PromoteAllScalars=true]),
TypageCol = Table.TransformColumnTypes(PromoteHeader,{{"Janvier", Currency.Type}, {"Février", Currency.Type}, {"Mars", Currency.Type}, {"Avril", Currency.Type}, {"Mai", Currency.Type}, {"Juin", Currency.Type}, {"Juillet", Currency.Type}, {"Août", Currency.Type}, {"Septembre", Currency.Type}, {"Octobre", Currency.Type}, {"Novembre", Currency.Type}, {"Décembre", Currency.Type}}),
SupprCol = Table.RemoveColumns(TypageCol,{"Total"})
in
SupprCol
in
MaFonction
Ventes
let
Source = Folder.Files("C:\Users\dmago\Downloads\Ventes"),
#"Autres colonnes supprimées" = Table.SelectColumns(Source,{"Name", "Folder Path"}),
#"Duplication de la colonne" = Table.DuplicateColumn(#"Autres colonnes supprimées", "Name", "Name - Copier"),
#"Texte extrait avant le délimiteur" = Table.TransformColumns(#"Duplication de la colonne", {{"Name - Copier", each Text.BeforeDelimiter(_, "."), type text}}),
#"Personnalisée ajoutée" = Table.AddColumn(#"Texte extrait avant le délimiteur", "Personnalisé", each FxMaFonction([Folder Path]&[Name],[#"Name - Copier"]))
in
#"Personnalisée ajoutée"
Message d'erreur obtenu
Qu'est ce que je fais mal ?
Bonne soirée,
Cordialement