Bonjour à tous,
Je tente d'améliorer le code d'import d'un fichier CSV sans passer par l'éditeur de requête ce qui me donne pour le moment :
let
Source = Folder.Files("E:\SUC15"),
FiltreCSV = Table.SelectRows(Source, each ([Extension] = ".csv" or [Extension] = ".CSV")),
SuppCol = Table.SelectColumns(FiltreCSV,{"Content"}),
AjtCol = Table.AddColumn(SuppCol, "Tbl", each #"Transformer le fichier à partir de Requête2"([Content])),
OthersSuppCol = Table.SelectColumns(AjtCol, {"Tbl"}),
DvpTbl = Table.ExpandTableColumn(OthersSuppCol, "Tbl", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14", "Column15", "Column16"}, {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6", "Column7", "Column8", "Column9", "Column10", "Column11", "Column12", "Column13", "Column14", "Column15", "Column16"})
in
DvpTbl
Il fonctionne mais je voudrais modifier l'étape AjtCol, en remplaçant :
#"Transformer le fichier à partir de Requête2"([Content])),
par directement la fonctionnalité que fait appelle cette ligne.
Le code de "Transformer l'exemple de fichier à partir de Requête2" est le suivant :
let
Source = Csv.Document(#"Paramètre de l'exemple de fichier1",[Delimiter=";", Columns=16, Encoding=1252, QuoteStyle=QuoteStyle.None])
in
Source
Merci d'avance pour votre aide,
Cordialement,