AW: Power Query Spalten aus Quelle einfügen
19.02.2022 07:05:23
Andreas
Ich hoffe, es hilft:
let
Quelle = Folder.Files("c:\hier_steht_der_pfad_zum_ordner\"),
#"Entfernte Spalten" = Table.RemoveColumns(Quelle,{"Extension", "Date accessed", "Date modified", "Date created", "Attributes", "Folder Path"}),
#"Hinzugefügte benutzerdefinierte Spalte" = Table.AddColumn(#"Entfernte Spalten", "Benutzerdefiniert", each Folder.Files("c:\hier_steht_der_pfad_zum_ordner")),
#"Entfernte Spalten1" = Table.RemoveColumns(#"Hinzugefügte benutzerdefinierte Spalte",{"Content"}),
#"Erweiterte Benutzerdefiniert" = Table.ExpandTableColumn(#"Entfernte Spalten1", "Benutzerdefiniert", {"Content"}, {"Benutzerdefiniert.Content"}),
#"Tiefer gestufte Header" = Table.DemoteHeaders(#"Erweiterte Benutzerdefiniert"),
#"Geänderter Typ" = Table.TransformColumnTypes(#"Tiefer gestufte Header",{{"Column1", type text}, {"Column2", type any}}),
#"Höher gestufte Header" = Table.PromoteHeaders(#"Geänderter Typ", [PromoteAllScalars=true]),
#"Geänderter Typ1" = Table.TransformColumnTypes(#"Höher gestufte Header",{{"Name", type text}, {"Benutzerdefiniert.Content", type binary}}),
#"Gefilterte ausgeblendete Dateien1" = Table.SelectRows(#"Geänderter Typ1", each [Attributes]?[Hidden]? true),
#"Benutzerdefinierte Funktion aufrufen1" = Table.AddColumn(#"Gefilterte ausgeblendete Dateien1", "Datei transformieren (9)", each #"Datei transformieren (9)"([Benutzerdefiniert.Content])),
#"Erweiterte Datei transformieren (9)" = Table.ExpandTableColumn(#"Benutzerdefinierte Funktion aufrufen1", "Datei transformieren (9)", {"Beleg", "Ihr Beleg", "Datum", "Betrag"}, {"Datei transformieren (9).Beleg", "Datei transformieren (9).Ihr Beleg", "Datei transformieren (9).Datum", "Datei transformieren (9).Betrag"}),
#"Entfernte Spalten2" = Table.RemoveColumns(#"Erweiterte Datei transformieren (9)",{"Benutzerdefiniert.Content"}),
#"Neu angeordnete Spalten" = Table.ReorderColumns(#"Entfernte Spalten2",{"Datei transformieren (9).Beleg", "Datei transformieren (9).Ihr Beleg", "Datei transformieren (9).Datum", "Datei transformieren (9).Betrag", "Name"}),
#"Gefilterte Zeilen" = Table.SelectRows(#"Neu angeordnete Spalten", each [#"Datei transformieren (9).Beleg"] "Gesamtsumme"),
#"Spalte nach Trennzeichen teilen" = Table.SplitColumn(#"Gefilterte Zeilen", "Name", Splitter.SplitTextByDelimiter("_", QuoteStyle.Csv), {"Name.1", "Name.2"}),
#"Geänderter Typ2" = Table.TransformColumnTypes(#"Spalte nach Trennzeichen teilen",{{"Name.1", Int64.Type}, {"Name.2", type text}}),
#"Umbenannte Spalten" = Table.RenameColumns(#"Geänderter Typ2",{{"Datei transformieren (9).Beleg", "Beleg"}, {"Datei transformieren (9).Ihr Beleg", "Ihr Beleg"}, {"Datei transformieren (9).Datum", "Datum"}, {"Datei transformieren (9).Betrag", "Betrag"}}),
#"Geänderter Typ3" = Table.TransformColumnTypes(#"Umbenannte Spalten",{{"Datum", type date}, {"Betrag", Currency.Type}}),
#"Umbenannte Spalten1" = Table.RenameColumns(#"Geänderter Typ3",{{"Name.1", "Avis-Nr"}, {"Name.2", "Avis-Datum"}}),
#"Ersetzter Wert" = Table.ReplaceValue(#"Umbenannte Spalten1",".pdf","",Replacer.ReplaceText,{"Avis-Datum"}),
#"Geänderter Typ4" = Table.TransformColumnTypes(#"Ersetzter Wert",{{"Avis-Datum", type date}, {"Beleg", Int64.Type}}),
#"Hinzugefügter Index1" = Table.AddIndexColumn(#"Geänderter Typ4", "Index.1", 1, 1, Int64.Type),
#"Entfernte Duplikate" = Table.Distinct(#"Hinzugefügter Index1", {"Beleg"})
in
#"Entfernte Duplikate"