Importierte textfiles auswerten

Guten Morgen,
Ich arbeite gerade an einem kleinen Projekt, bei dem ich wieder mal eure Hilfe brauchen könnte.
Ich habe mit Daten Abrufen, alle Textfiles in einem Ordner importiert, in diesem falle 24.
In jedem Textfiles sind 315 Werte gespeichert, die ich auslesen will.
In spalte A habe ich beim Importieren die führenden nummern abgetrennt, da die, dem ID entsprechen, nach dem ich auslesen will.
In der Spalte C sind die Bezeichnungen der in jedem Textfile wiederkehrenden Werte ausgelesen.
In Spalte D die gesuchten Werte.
Ziel ist es, die Werte zu den Bezeichnungen aus jedem Textfile in eine extra Spalte auszugeben.
Ich habe bis jetzt die Unic ID nummern aus spalte a extrahiert, aber leider nur in Zeilen geschafft, bräuchte es aber waagerecht in Spalten. z.B.B2 bis V2
Mit dieser Formel.
=INDEX($A:$A;AGGREGAT(15;6;ZEILE(A$2:A$10803)/(ZÄHLENWENN(T$1:T1;A$2:A$10803)=0) /(A$2:A$10803"item");1)) &""
die Bezeichnungen habe ich manuell ins Blatt Auswertung kopiert, weil Hilfsfelder die gleiche Bezeichnung haben
Dann wollte ich eigentlich im Blatt Auswertung die Werte mit einer Formel auslesen, hab da aber noch irgendwo einen Wurm drin.( funktioniert gut bis ich die Bereiche vergrößere).
=WENNFEHLER(VERWEIS(9;1/(B$2&$A3=Expert4x_TT_2021_11!A2:A10000&Expert4x_TT_2021_11!C2:C10000); Expert4x_TT_2021_11!D2:D10000);"")
Ich habe mal eine Musterdatei beigefügt und im Blatt Auswertung die ID nummern Manuell in die spalten eingefügt.B2:V2
ebenfalls die Bezeichnungen A3:A315
https://www.herber.de/bbs/user/149949.zip
Ich hoffe ich habe mich halbwegs verständlich ausgedrückt
danke
Johannes

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Johannes,
Nach dem letzten Post sehe ich, dass Du trotz "Basiskenntnisse in Excel" doch einen gesunde Verstand von Power Query.
Ich werde trotzdem nicht die -schon vorher angefangene- Erklärung abspecken. Es könnten anderen, nicht so Fortgeschrittenen, auch damit was anfangen.
@Werner: mir geht es nicht nur ums "helfen", sondern, dass es mir die Gelegenheit, mit PQ zu spielen. U.a. die Text-Verkettung als Aggregate hätte ich ohne das "Problem" nie danach gesucht.
Mit PQ, Schritt für Schritt:
_ gehe auf das Blatt "Export4x_..." und klick auf A1
_ Menü "Daten", "aus Tabelle"
Du bist jetzt in PQ Editor. Da wir aber die andere Liste brauchen,
_ auf "Schliessen & laden in..." klicken, "nur Verbindung erstellen" einsetzen.
Du bist wieder im klassischen Excel-Welt.
_ gehe auf das Blatt "Auswertung"
_ klicke die Zelle A2
_ Menü "Daten", "Aus Tabelle"
_ andere den Range "$A$2:$Y$315" in "$A$2:$A$315" (nur die Spalte A), hat überschrift: nein.
Du bist wieder in PQ-Editor. Die neue Abfrage heisst "Tabelle2" (Name ist nur für der Erklärungspunkt "Abfrage zusammenführen" von Relevanz)
_ markiere die Spalten "Source.Name.2", "Column3", "Column4" und rechtklicke auf "Spalten entfernen"
_ mit Dem Filter auf "Column.2" entfernst Du alles Werte (u.a. 0), die Du nicht brauchst
_ markiere die Spalten "Source.Name.1", "Column1"
_ Menü "transformieren", "Gruppieren nach"
_ Die 2 Spalten zu gruppieren sind schon da,
_ als Aggregationsvorgang "Summe" auf Spalte "Column2" einstellen (!)
_ es führt zu einen Sammlung von "Error"
_ in der Formelleiste, da wo each List.Sum([Column2]) steht,
_ ändern in (achtung Case sensitive): each Text.Combine([Column2], ";")
Mit diesem Eingriff in der Gruppierung ist der Schritt nicht mehr "Standard" und das Rädchen in der Schrittliste ist für diese Schritt nicht mehr vorhanden.
Wir brauchen aber nur ein Teil diese Daten:
_ im Menü "Start", "Abfrage zusammenführen"
_ "Tabelle2" als zweite Abfrage auswählen
_ im obere Tabelle "Column1" markieren,
_ in zweite Abfrage die einzige Spalte markieren
_ als Join-Art "Inner Join" auswählen
_ die neue Spalte brauchen wir nicht. Es war nur einen Filter. Markieren und entfernen.
Die jetzige Spaltendefinition gilt für alle deiner Quellen. Bei nächsten Schritt werden ein unvorhersehbar Anzahl an Spalten erzeugt, so dass die Abfragen nicht mehr zusammengeführt werden könnten. Daher Quellen zusammenführen, dann verarbeiten.
_ markiere die Spalten "Source.Name.1"
_ gehe in "Transformieren" auf "Spalte pivotieren"
_ "Wertespalte" ist "Column.2"
_ in "erweiterte Optionen" setze auf "Nicht aggregieren"
_ "Schliessen und laden in..." diesmal nicht "nur Verbidnung erstellen", sondern richtig herausgeben.
Fertig.
Manche Kombinationen ergeben "Error". Es liegt daran, dass der Text.Combine nicht funktioniert hat, weil zu viele Einträge vorhadnen wäre. Wie es dazu kam, liegt an der Daten. Da kann ich leider nicht weiterhelfen.
VG
Yal

let Quelle = Excel.CurrentWorkbook(){[Name="Tabelle1"]}[Content], #"Entfernte Spalten" = Table.RemoveColumns(Quelle,{"Column4"}), #"Gruppierte Zeilen" = Table.Group(#"Entfernte Spalten", {"Column1", "Column3"}, {{"alle", each _, type table [Column1=text, Column2=text, Column3=number]}}), #"Hinzugefügte benutzerdefinierte Spalte" = Table.AddColumn(#"Gruppierte Zeilen", "Wert", each [alle][Column2]), #"Extrahierte Werte" = Table.TransformColumns(#"Hinzugefügte benutzerdefinierte Spalte", {"Wert", each Text.Combine(List.Transform(_, Text.From), ";"), type text}), #"Entfernte Spalten1" = Table.RemoveColumns(#"Extrahierte Werte",{"alle"}), #"Pivotierte Spalte" = Table.Pivot(Table.TransformColumnTypes(#"Entfernte Spalten1", {{"Column3", type text}}, "de-CH"), List.Distinct(Table.TransformColumnTypes(#"Entfernte Spalten1", {{"Column3", type text}}, "de-CH")[Column3]), "Column3", "Wert") in #"Pivotierte Spalte"

Beliebteste Forumthreads (12 Monate)

18 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

18
Beiträge zum Forumthread

Beiträge zu diesem Forumthread