Résultats de la recherche

Re, désolé je n'ai pas d'accès à un sharepoint, donc c'est difficile de t'aider ou de tester...

Re, Peut-être ajouter une raz (n = 0: Erase A) avant le début de la boucle Do While Not EOF(1) . Cordialement,

Bonjour JM, le fil, L'étape "Columns" permet de créer une liste de 3 listes (Nom des colonnes Finales, type des colonnes finales, nom des colonnes de la source) par simplicité et pour une utilisation future dans le code. La fonction Table.TransformColumnTypes requière une synthaxe {{"Nom...

Bonjour @cathodique, le forum, Si jamais l'option Power Query est envisageable pour vous, une proposition. Il suffit d'ajouter le chemin de votre dossier content les .csv. Cordialement,

Bonjour le fil, Pas vraiment plus court... let Source =...

Bonsoir à tous, un autre essai pour le "fun" et ceux qui aiment triturer du code M... let Source = Excel.CurrentWorkbook(){[Name = "Départ"]}[Content], ColName = Table.ColumnNames(Source), #"Grouped Rows" = Table.Combine( Table.Group( Source, ColName{0}, {{"Custom"...

Un essai d'optimisation, let Source = Table.RemoveLastN(Excel.Workbook(File.Contents("D:\PQ Fichier source.xlsx), true, true)[Data]{0},3), ColName = Table.ColumnNames(Source), #"Selected Columns" = Table.SelectColumns(Source, {ColName{0}, ColName{7}}), #"Renamed Columns" =...

Re, impossible d'ouvrir le fichier "PQ Fichier source"..

Bonjour Mongo, Pouvez-vous nous fournir un fichier exemple avec des données anonymisées. Plus simple pour optimiser le code...

Bonjour JM, le fil, le forum, Difficile de comprendre le but final recherché: de nombreuses colonnes "Code Client", "Nom Client", "Fournisseur", "Pays"... ne sont pas prises en considération... Un essai qui donne le TDC présenté avec les taux par mois. Le code est détaillé par étapes pour...

Bonsoir JM, le forum, Le plus simple est d'jouter la Culture "fr-FR" dans la fonction Table.TransformColumnTypes. étape Result à remplacer par celle ci-desous: = Table.Combine(Table.ReplaceValue(Folder.Files(Table.ToList(Excel.CurrentWorkbook(){[Name="CSV_PATH"]}[Content]){0}), each...

Bonjour à tous, Un exemple du résultat escompté serait plus simple pour répondre. 2 propositions PQ si les colonnes "CoutX" doivent apparaitre ou non dans le tableau final. De manière identique très compliqué de faire un lien avec le fil précèdent au niveau des colonnes exportées du csv...

Bonjour JM, CousinHub, le fil, Sans avoir lu les messages depuis dimanche, un essai... Bonne soirée à tous

Bonjour à tous, je suis hors sujet mais pour le fun via PQ. Bonne aprem.

Bonjour Sherpa11, le forum, Aucune protection sur le fichier. pour mettre à jour => Données => Actualiser. edit: Bonjour Cousinhub !

Re, Pour être honnête, j’utilise ce forum depuis quelques mois pour apprendre PQ. Mes neurones du XXième siècle commencent à comprendre cette logique, je n’ai aucun doute pour les tiens étant donné ton niveau en vba. Apprendre est une bénédiction:) Flatté si je suis présent dans ton carnet à...

List.accumulate est LA fonction magique de PQ pour boucler. Synthaxe : List.Accumulate(list as list, seed as any, accumulator as function) as any List.Union(List.Accumulate( {0..Table.RowCount(Source)-1}, // liste à accumuler – l’indice de chaque ligne de l’étape précédente {}, // la seed ...

Re, Table.ExpandTableColumn nécessite une liste du nom des colonnes à étendre. Si cette liste est écrite en "dur", si un jour une colonne additionnelle est présente, la requête va échouée.

Re JM, Bonjour CousinHub, le forum, pour le retour à la ligne et rendre le code plus lisible - CTRL + Entrée. une autre proposition alors :) let Source = Table.SelectColumns(Table.AddColumn(Table.SelectRows(Folder.Files(Table.ToList(Excel.CurrentWorkbook(){[Name="CSV_PATH"]}[Content]){0})...

Re, les fichiers testés sont ceux du zip. un autre essai pour le nom des fichiers let Source = Folder.Files("C:\Users\STAPLE\Documents\PQ_CSV"), Result = let x = Table.SelectColumns(Table.AddColumn(Source, "Custom", each Table.PromoteHeaders(Csv.Document([Content],[Delimiter=";"...