Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: 123run am März 22, 2017, 20:39:37 Nachmittag

Titel: Office 2013: automatisch sortieren
Beitrag von: 123run am März 22, 2017, 20:39:37 Nachmittag
Hallo zusammen,

ich hoffe ihr könnt mir helfen, ich stelle einfach mal die Frage :)
Ich habe eine unsortierte Tabelle1
in Tabelle 2 möchte ich automatisch sortieren lassen.
Es sollte nur nach Datum "Spalte B" ( KKleinste) sortiert werden.

Tabelle1
Pos1   10.04.2017   Daten1   Eintrag1
Pos2   02.04.2017   Daten2   Eintrag2
Pos3   10.04.2017   Daten3   Eintrag3
Pos4   04.04.2017   Daten4   Eintrag4
Pos5   04.04.2017   Daten5   Eintrag5
Pos6   04.04.2017   Daten6   Eintrag6
Pos7   20.04.2017   Daten7   Eintrag7
Pos8   08.04.2017   Daten8   Eintrag8
Pos9   09.04.2017   Daten9   Eintrag9

Tabelle2
Pos2   02.04.2017   Daten2   Eintrag2
Pos10   03.04.2017   Daten10   Eintrag10
Pos4   04.04.2017   Daten4   Eintrag4
Pos5   04.04.2017   Daten5   Eintrag5
Pos6   04.04.2017   Daten6   Eintrag6
Pos8   08.04.2017   Daten8   Eintrag8
Pos9   09.04.2017   Daten9   Eintrag9
Pos1   10.04.2017   Daten1   Eintrag1
Pos3   10.04.2017   Daten3   Eintrag3
Pos7   20.04.2017   Daten7   Eintrag7

hier mal meine Lösungsansätze die nicht klappen!

Code 1 klappt!  /  Tabelle2 "B1-B10)
=WENNFEHLER(KKLEINSTE(Tabelle1!B:B;ZEILEN($B$1:B1));"")

Code 2 klappt nicht um die andere zellen nachzuziehen.
=WENNFEHLER(INDEX(Tabelle1!$A$1:$A$99;KKLEINSTE(WENN(ISTZAHL(SUCHEN(B1;Tabelle1!$B$1:$B$99));ZEILE(Tabelle1!$1:$99));ZEILE(A1)));"")

Über tipps würde ich mich freuen,

gruß Jan
Titel: Antw:Office 2013: automatisch sortieren
Beitrag von: DL am März 22, 2017, 20:51:17 Nachmittag
Hallo Jan

Ich spendiere dir mal ein paar Hilfsspalten.

Tabelle1
E2
=B1+ZEILE()%%%
Tabelle2
A2:E2
=INDEX(Tabelle1!A:A;$E1)
=WENNFEHLER(KKLEINSTE(Tabelle1!E:E;ZEILEN($B$1:B1));"")
=INDEX(Tabelle1!C:C;$E1)
=INDEX(Tabelle1!D:D;$E1)
=VERGLEICH(B1;Tabelle1!E:E;0)
Titel: Antw:Office 2013: automatisch sortieren
Beitrag von: 123run am März 23, 2017, 08:54:55 Vormittag
hi,

ist die Hilfspalte in Tabelle1 "E2" notwendig?
Immerhin ist das Datum bereits als vorgabe in Tabelle1 Spalte B.

Tabelle2 ; B2 + abwärtskopieren(ziehen)
=WENNFEHLER(KKLEINSTE(Tabelle1!B:B;ZEILEN($B$1:B1));"")

Mit der Formel wird Tabelle 2 Spalte B mit den Daten von T1 "B:B" gut sortiert.
Bekomme aber irgendwie nicht die anderen Spalten in Tabelle2 sortiert.

viele Grüße
Jan


Titel: Antw: Antw:Office 2013: automatisch sortieren
Beitrag von: DL am März 23, 2017, 09:10:15 Vormittag
ist die Hilfspalte in Tabelle1 "E2" notwendig?
Offenbar hast du es mit der Hilfsspalte überhaupt nicht ausprobiert.
Titel: Antw:Office 2013: automatisch sortieren
Beitrag von: 123run am März 23, 2017, 09:29:03 Vormittag
ich habe gestern sehr lange an den Formeln herumprobiert, bis ich hier nochmal geschrieben habe.

ausprobiert schon, leider ohne Erfolg.
Aus meiner Sicht muss die Struktur der Tabelle1 in die Tabelle2 übertragen werden, ohne eine Spalte auszulassen.
Nur das Tabelle 2 dann automatisch sortiert ist.

Bei Tabelle1 kommen täglich neue Datensätz hinzu ( immer letzte freie Zeilen) .
Das ganze ist nachher in Tabelle 2 nach Datum automatisch sortiert.

Ist zumindestens mein ziel :)
Titel: Antw:Office 2013: automatisch sortieren
Beitrag von: DL am März 23, 2017, 09:48:18 Vormittag
Mit meinen Formeln erhältst du das gewünschte Ergebnis.  Bei neuen Datensätzen müssen die Formen natürlich weiter nach unten kopiert werden.


Alternativ kannst du dir das Power Query-AddIn installieren. Dann reicht z.B. dieser Code.
let
    Quelle = Excel.CurrentWorkbook(){[Name="tbl_Daten"]}[Content],
    #"Geänderter Typ" = Table.TransformColumnTypes(Quelle,{{"Pos", type text}, {"Datum", type date}, {"Daten", type text}, {"Eintrag", type text}}),
    #"Sortierte Zeilen" = Table.Sort(#"Geänderter Typ",{{"Datum", Order.Ascending}})
in
    #"Sortierte Zeilen"
Voraussetzung ist das die Liste Überschriften hat und als Tabelle formatiert ist.
Titel: Antw:Office 2013: automatisch sortieren
Beitrag von: 123run am März 23, 2017, 17:09:41 Nachmittag
kurzes Feedback.
Es hat geklappt, vielen Dank.
Ich habe die erste Formel statt E2 in E1 geschrieben.

Scheint so zu funktionieren...

Dank den kurzen Formeln rechnet die Excel Datei schneller  8)