1 2 3 4 5 6 7 8 9 10 11 12
| (Liste_Dossier as list) =>
let
Contenu_Dossier = List.Transform(Liste_Dossier, each Folder.Contents(_)),
Ajout_Table =Table.Combine(Contenu_Dossier),
Filtre_ligne_dossier = Table.SelectRows(Ajout_Table, each [Attributes][Directory]),
Concaténation_Chemin_Nom = Table.AddColumn(Filtre_ligne_dossier, "Chemin_Complet",each [#"Folder Path"]&[Name]),
Liste_Sous_Dossiers = Concaténation_Chemin_Nom[Chemin_Complet]
in
if List.IsEmpty(Liste_Sous_Dossiers)
then Liste_Dossier
else Liste_Dossier & @Fn_sous_dossier2(Liste_Sous_Dossiers) |
Partager